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En bok till din 

/PECTRUM 

SPECTRUMHANDBOKEN 

Både en lättillgänglig nybörjarbok och en användbar uppslagsbok för den 
mer erfarne programmeraren. C:a 136:— 

UPPTÄCK DIN SPECTRUM 

En vägvisare till ZX Spectrum som ger grunderna i programmering, ge¬ 
nomgång av färg & ljud, maskinkod mm. C:a 136:— 

ARBETA MED SPECTRUM 

Boken visar dig hur man använder ZX Spectrum som ett redskap inom en 
mängd olika områden. C:a 136:— 

LEK MED SPECTRUM 

En samling korta och enkla program. 

Finns nu även på finska. C:a 49:— 

KNEP & KNÄP MED SPECTRUM OCH ZX81 

Klurigheter och problem att lösa på ZX81 & Spectrum. 

Finns nu även på finska C:a 49:— 

SPECTRUM — OVAN REGNBAGEN 

Den mycket populära programboken med både spel- och applikations¬ 
program. C:a 136:— 

BORTOM BASIC SPECTRUM MASKINKOD 

Kan du redan lite Basic men ingen maskinkod är detta boken för dig. 

C:a 115:— 


MICRODRIVEN 

Boken som går igenom microdrivens alla funktioner och ger dig helt nya 
perspektiv. (Boken kommer under våren). 


Böckerna finns i bokhandeln & databutikerna. Kan även be¬ 
ställas direkt från förlaget, då tillkommer frakt & orderavgift. 
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Gammelosten är illa ute. Den har flytt från 
gnurglornas bo och det finns råttor i trakten. Detta är 
en fristående fortsättning på spelet ”Gnurglorna 
möter gammelosten”, som var med i förra numret av 
”Allt om Hemdatorer”. 


AV CLAS KRISTIANSSON 


10 

20 

30 

40 

50 
60 
70 
BO 
90 
100 
110 
120 
130 
133 
140 
130 
160 
170 
180 
190 
200 
210 
220 
230 
240 
230 
260 
270 
200 
290 
300 
310 
320 
330 
340 
350 
360 
370 
30 *:» 
390 
400 
410 
420 
430 
440 
450 
460 
470 
400 
490 
500 
510 
320 
525 
530 
540 
530 
560 
PLAV 
570 
580 
590 


LET RY-INT <RND*32> 


REM ... 

HEM t ORGINAL FOR * 

HEM • ALLT OM HEMDATORER * 

REM • AV CLAS KRISTIANSSON* 

REM •••**••••*•••»*(••••*•« 

REM 

BÖRDER T: IN» 6t PAPER 2: CLS 
LET X«15* LET Xl«*.5i LET RX«JNT (RND922) 

LET Z* 13* LET Y-15l LET S«.2 
LET H*=" CDE "* LET I»®" B F "* LET R*«*'GH'* 

PRINT AT Z.Y*“ - 
LET Z1=Z* LET Y1*Y 
IF RND S*Z THEN GO SUB 0390 
BEEP .001.40 

LET Z«Z+' XNfr-Ev4«"6“>-< IN» E/» = "7**> 

LET Y-Y* (INKEY*-"8") - (INKEY»- "2“ » 

IF Z‘21 THEN LET Z=21 
IF Z 1 THEN LET Z-l 
IF V I THEN LET Y-l 
IF Y>30 THEN LET Y»30 

IF SCREEN* (Z.YX •" " THEN LET Y«V1s LET Z-Zls BEEP 
GO SUB 0290 

IF RND S THEN GO SUB 0330 
LET 5*8*.0001 

IF X*3-V AND Z=1 THEN GO TO 0510 
PRINT INF. 4; BRIGHT Ij FLASH IjAT Z. Y; "A 
PAUSE 3 

IF INKEY*»“- THEN GO TO 0210 
GO TO 0110 

PRINT XNK 3*AT O,X,h*,AT I.XjI» 

LET X-X+Xl 

IF X >27 OR X< 1 THEN LET XI—XI 
RE TURN 

PRINT AT RX,RY»" " 

LET RX=RX♦S&N <Z-RX) 

LET RY-Ry*SGN <Y-<RV*l>> 

PRINT AT RX.RY» INF 7| BRIGHT 1*R* 

IF RX=Z AND RY-*1*Y THEN GO TO 0460 
RETURN 

LET R=INT (RND*3)♦ ! 

BEEP .1.-10 
GO SUB R*10*420 
RETURN 

PRINT AT Z.YM* INVERSE 1 * *' "jCHR* B» INVERSE Oj OVER It" 

PRINT AT Z-l.Y» INVERSE l|" "jCHR* 0 { INVERSE 0} OVER ls 

BEER 7 ^ 1 Z * V-11 INVERSE 1 * “ ”»CHR* B; INVERSE 0| OVER 1*". M | 

PRINT AT Z, Y—T| FLASH 1|"MUMS" 

IF IN»EY*=«“ THEN GO TO 0480 
IF INKEY* "" THEN 60 TO 0490 
RUN 

LET P=INT Cl/(S-.2>> 

PRINT AT 3, Xi INVERSE 1 jP» "POÄNG*' 

PRINT FLASH 11 AT Z.Y|"“ 

BEEP .2,0* BEEP .4.3» BEEP .0.7* BEEP .2.1' 

60 TO 0400 

SAVE "GAMMEL" LINE 0580: SAVE " OST"CODE USR "A".64 
CLS i PRINT AT^10,0» FLASH 1 *"SPOLA TILLBAKS BANDET OCH BYT 
OLH VERIFIERA" 

VER I FY *'"» VER IF Y ""CODE USR 
LOAD " OST"CODE USR "A".64 
RUN 


"A"* STOP 



SLADDAR.TRYC» 
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Spelet 

Gammelosten tröttnade till slut på 
gnurglornas håla och bestämde sig för 
att ta sig hem igen. När han väl hade 
kommit ut såg han sin lilla hydda uppe i 
norr. Han satte god fart. Snart skulle 
han komma hem igen. Men det var 
väldigt vad mycket sten det fanns 
överallt, han var tvungen att gå långa 
omvägar. 

-Men var är det? Finns det en råtta 

här? Måste hem innan den äter... 

Det är din uppgift att se till att 
Gammelosten hinner hem innan råttan 
tar den. Du styr som vanligt med 
cursorpilarna 5 6 7 8. 

Programmet 

Skriv först följande program: 

10 LET L=USR "a" 

20INPUT $ 

= 30POKEL, B 
= 40PRINTL, B 
50 LET L=L+1 
60 GOTO 20 

— Mata sedan in följande siffror i datorn 


med hjälp av programmet: 

16, 0, 36,0. 76,28,126,225 
99, 99,99,99,99, 99, 127,127 
3, 15,28, 24,48, 48,96,97 
255, 255, 0, 126, 126, 102, 195, 129 
192,240, 56, 24,12,12, 6,134, 

198, 198, 198 198, 198, 198, 254,254 
0,0, 0,0, 3,31,63,226 
0,0,0, 4, 198,254,240, 16 

Om du nu matar i ett Q så bryts 
programmet med ett errormeddelande. 

Gör så för att kunna skriva i 
huvudprogrammet. 

Nu är grafiken klar! Skriv NEW och 
mata in programmet exakt som det 
står Rad 100, 250, 525 innehåller 
grafiska tecken. Vill du öka 
svårighetsgraden kan du öka värdet 
hos variabeln S. 

Lägg i ett nytt och fräscht band i 
bandspelaren, skriv GOTO 550. tryck 
på PLAY och valfri tangent. Nu är det 
hela sparat. Spola tillbaka bandet och 
byt kontakter för verifiering. 

I nästa nummer blir det råttjakt! 


Programuppbyggnad 

Viktiga variabler 

Z: gammelostens position i X-led 
Y: gammelostens position i Y-led 
RX: råttans position i X-led 
RY: råttans position i Y-led 
X: husets position 
XI: husets förflyttning 
S: sannolikhet för råtta och stenar 

Programrader 

110-280 Huvudloop 
290-320 Husets förflyttning 
330-380 Råttans förflyttning 
390-450 Ritar ut stenar 
470-500 Råttan äter osten 
510-540 Osten hinner in i tid 
550-570 Rutin för att spara och 
verifiera spelet 
580-590 Läser in grafiken 

Variabeln S ger en viss sannolikhet 
att råttan skall förflytta sig och att en ny 
sten skall dyka upp bredvid 
gammelosten. 









































































YOUR C 


1PUTER 


MORGONDAGENS 

HEMDATOR 


I <\RAM or 32 K RAM 

aker Oiitput 

nal pnnjer 

rracters vicn?o 

iMiome TV oK monitor 

available 

actfiie-avaiiable \ 
erface\ \ 

phics capability 
in space b\r inser^-" 
;ontroJJteys\ 
j mode \ 

, \ 


■OR YTTERLIGGARE INF) 
KONTAKTA NÄRMASTE 


EXPERT BUTIK ’ 
ELLER TRELI4EDATA 


HANTVERKAREGATAN 2 
TRELLEBORG 
TEL. 0410-114 40 






wjjjt 

' w *VIC-64 


I detta nummer av Allt om Hemdatorer som du nu håller 
i handen finns en listning på en teckendator.Det är ett 
program som låter dig definiera egna tecken, t.ex. till 
"Space Invaders”, monster, ÅÄÖ, grekiska alfabetet eller 
kanske rent av förbättra eller göra om de inbyggda 
tecknen. Endast din fantasi och uppfinningsrikedom kan 
begränsa dig. 

Här är en kort beskrivning på hur du använder editorn. 

"+" används för att sätta en punkt. Bredvid rutmönstret 
visas hela tiden tecknet du håller på att bygga upp. 

används för att ta bort en punkt. Ändring sker även 
på tecknet bredvid rutmönstret. 

"B" byter skärm och du får fram de tecken du ändrar på. 
Sätt cursorn ovanpå det tecken du vill definiera, tryck 
sedan på "RETURN" och vips tecknet är definierat. 

Tryck på "B” igen så kommer ditt tecken fram igen. 

"N” betyder "nytt tecken", och rensar ditt gamla tecken. 

"S" betyder slut, detta trycker du på när du är nöjd. 

Nu händer lite konstiga saker på skärmen, detta är fullt 
normalt. Programmet håller på och göra upp ett nytt 
program, rör ingenting förän cursorn blinkar. Nu kan 
du sparar dina tecken på band. Skriv "SAVE TECKEN" 
och spara som vanligt. 

Du kan nu sammanfoga detta teckenprogram med ett 
annat. Ladda in ditt program där du vill använda dina 
tecken. Skriv sedan, POKE 44, PEEK (46) : POKE 43, 

PEEK (45)-2 

Ladda nu in ditt teckenprogram genom att skriva 
"LOAD "TECKEN”. När detta är klart skriver du POKE 
43,1: POKE 44,8 


Lista nu ditt program så ser du att även ditt 
teckenprogram finns med. 

På rad 0 skriver du GOSUB 60000. Observera att ditt 
program inte får innehålla radnummer över 60000. 
Tecknen till ÅÄÖ i förra numret var inte så bra. Bättre Å Ä 
ö finns med här. Byt bara ut datasatserna. 

En annan sak är att arean för Basic program blev liten. 
Därför föreslår jag följande ändringar. 

Rad 10, 8192 byts ut mot 2048. I rad 30, 8192 byts ut 
mot 2048. Rad 40 skriver du POKE 53272.18. Rad 45 tas 
bort helt. Slutligen om du tryckt run/stop/restore skriv 
POKE 53272.18.Ibland kan det vara bra att stänga av 
RUN/STOP/RESTORE funktionen detta kan man göra 
genom att lägga in POKE 808.225 i ditt program. Vill du 
endast stänga av RUN/STOP är poke koden 788,52. 

En efterlängtad nyhet har dykt upp. Det är TOOL-64 
och är ett programmeringshjälpmedel på cartridge, 
leverantör är Handic. Obs förväxla inte detta med Simons 
Basic som är en annan sak och som jag presenterar i 
nästa nummer. 

Jag har lekt lite med TOOL-64 och här är en 
sammanfattning. 

TOOL-64 är ett bra programmeringshjälpmedel men 
vissa avsnitt är dåligt förklarade och med få 
programexempel. Totalt 36 extra kommandon ingår 
däribland skärmhantering och höggrafikkommandon. 
GET och INPUT ersätts med enklare kommandon. 

En rad som ser ut så här: 

GET A$: IF Aft " " THEN 10 ersätts med CARGET " ”, 
Detta kommando kan med rätt användning bli mycket 


kraftfullt. 

Det finns ett kommando som heter SSAVE, detta sparar 
bildskärmen (normal eller höggrafik) på diskett. Även 


kommando för full SCROLLNING. 

De kommando man ofta saknar är RENN (renumber), 
DELETE, AUTO, DUMP, ERROR, TRACE, IF-THEN-ELSE 
alla mycket användbara. Dump till skrivare, joysticks 
funktioner och diskkommandon. Här saknas alltså inget, 
ett oumbärligt verktyg för programtillverkan. 

Vi sesT nästa nummer. 

s Av Mikael Fors 



13 P0KE53272,30: P0KE993,1 GOSUB280' IFREEK2) =0THEHGO3UB200 RESTORE G0SUB288 

20 GO3UE260 : PRINT"flS ■" 0=65 POKE 1204,. 64 ■ GOSUB350 P0KE55476,1 POKE 999,0 

38 CETfi* IFAf ="'sV'THENPOKE 1024+X+Y,Q X=X+T IFX>7THENX=0 

40 lFflf= M H"THENPGKE1024+X+Y,Q X=X-1 IFX<0THENX=7 

50 IFR*="M"THENPOKE1024+X+Y,Q : V=Y+40:1FY>280THENV=0 

60 IFfif='’TTHEHPOKE1024+X+Y,Q Y=Y-40 IFY<0THENY=280 

70 IFa*="+"ORRt=CHR$<219>THENPOKE1024+X+V,31Q=31 : GOSUB170 

80 IFfif="-"0Rflf=CHRf<221>THENPOKE1024+X+V,65 : 0=65:GOSUB180 

90 I Fflf=" B" RNDB=0THENB= 1 Rf =" ’’ : GOSUB270 : GOSUB340 OOSUB220 

100 IFfif="B"AHDB=1THENE=0 : GO3UB320 PQKE1204,64 ; P0KE55476,1GOTO30 

110 IFfl*=CHRf<13)RNDB=1THENGO3UB250 

120 IFfl*="N"THENB=0 G0T028 

130 I Fflf =" S " THEN360 

150 IFRfO""THENQ=PEEK <1024+X+Y > : POKE1024+X+Y /160 : GOTO30 
160 GOTO30 

170 POKEI4848+Y/40,PEEKC14848+V/40>OR2T<7-X> : RETURN 

130 POKE14843+Y/40,PEEK <14848+Y/40 >RND255-<2T<7-X) ? RETURN 

200 PQKE56333,127 P0KE1-51 : FORI=0TO256*8-1 : POKEI+14336-REEK<53248+I> NEXT 

210 POKE 1,55 P0KE56333. 129 P0KE2 ,22 P0K.E53272,30 RETURN 

220 PR I NT 11 39ABCDEF G " F'R I NT " HIJKLNNO " : PRINT''PQRSTUVX" : PR I NT" YZrö fl T+- " PRI NT" ! ", 
230 PR INTCHRP < 34 > " #*" PR I NT " > #+, -. /8 " - PR I NT " 12345673" : PR I NT " 9 ; <=>? " 

240 PRINT"33 ■":Q=0 : X=0 Y=0 RETURN 

250 FQRI=0TO7 POKE14336+0*8+I,PEEK'14348+1> NEXT POKE1024+X+Y,G:RETURN 
260 ?RINT"rW’, F0RI=8T07’PRINT"********" NEXT X=0 : Y=0 RETURN 
270 FORU=0TO40*73TEP40 FORI=0TO7 P0KE8132+U+1,PEEK <1024+1+U > NEXT NEXT RETURN 
280 F0RI=14856T014863 RERDR PQKEI,R NEXT:FORI=27#8TO30#3-1 RERDR POKE14336+I,R 


290 NEXT RETURN 

300 DRTA0,0,0,0,0,24,24,0,102,24,60,102,126,102,102'0 REM SISTfl 3 SIFFRORNA = ft 
310 DFITA102,60,182,102,102,102,68,0,24,24,60,102,126,102,102,0 REM ö fl 
320 PR I NT 11 3" FOR I=0TO40*7STEP40 FORJ=0TO?: POKE1024+1+ J, PEEK <8192+1+J ’ 

330 P0KE55296+1+J, 1 NEXT NEXT X=PEEKC1000> Y=PEEK<1081)*40 : Q=PEEK.<1002> -RETURN 

340 POKE1000,X POKE 1001,Y/40 POKE1002,Q RETURN 

350 FORI=14843T014855 POKEI,0 NEXT RETURN 

360 INPUT"SKMWaMdÖffliaaRF DU SAKER",fl* IFflSO"J"OOTO30 

370 fl=PEEK(993> +60000 P0KE993,PEEK <998 > ■+1 IFPEEK <998)»66THEN420 

330 FORI=0TO7 fl*=STRJ(PEEKU4336+PEEK <999 >*8+1 > > fl$=RIGHTt<Rf ■ LEIKfi*>-l 

390 B*=B*+fl*+''," NEXT '■ PQKE399, PEEK<999)+1 

400 fl*=STR*'.fl.' fl*=fl*+"DRTH"+B* fl*=LEFT*<flJ,LEN(fl*>-l> PRINT"r»tfi"fl* 

410 PRINT"GOTO370" POKE198,2 P0KE631,13 P0KE632,13 : PRINT"3" END 

420 PRINT"2HMS0000FORI=14336T014847 RERDR POKEI,R NEXT P0KE53272-30 RETURN” 

430 PRINT"GOTO440" : POKE198,2 P0KE631,13 P0KE632,13 PRlNT"fl", P0KE999 1 EHD 
440 PRINT"Ofi" FORI=0TO8 FR'INTPEEKC.999>410+1*10 NEXT ■ PRINT"OOTO440'“ 

450 P0KE999,PEEK <999)+9 POKE198,10 FORI=0T09 P0KE631 +1,13 NEXT PRINT"fl" END 
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Tjut, Tjut, Tjut. (Jpp och hämta 
kläder, stövlar och mössor allt som 
man behöver ha med sig. Släng dig i 
brandstängerna för att komma ner till 
bilen men se samtidigt upp för de 
eldslågor som jagar dig. Ja i stort sett, 
så är detta spelet. 

Spelet börjar med att datom härmar 
en brandsiren sedan så tänds skärmen 
och spelplanen ritas ut. Nu gäller det 
att samla så många saker som möjligt 
och sedan ta dig ner till nästa plan där 
det finns mer saker att plocka. Så fort 
du går i närheten av en brandstege så 
åker du ner till nästa plan. 

Vill du fortsätta tryck då på space så 
hoppar brandmannen över hålet. 
Detsamma gäller om du vill hoppa över 
eldsvådorna. Eldslågorna är förflyttade i 
maskinkod och ligger i något som 
kallas interupt. 

Om du vill se en ovanlig sak trycker 
du på RGN/STOP under spelets gång. 
Rensa nu skärmen och skriv list, listan 
listas och på samma gång flyttar 
eldslågorna sig. Du styr brandmannen 
med "L" och samt hoppar med 
SPACE. 


I Kf.ll CWIsTlfitt , FETES' POPS 


FEM 

FEM 

FEM 


3 >J805 


5 F'0frE53280>ö P0KE53281.8 FPIiir.T 

é S=54272 FöPL»0T«»24 POBE^L O IIEXT P0tES«T4.5 P0KES-M816 P0l'ES*3,1 
. PUEE:.+24. 14.: POF E$*6.240 P0kES+4.*5 FF’=5339 FOFI=0TOj0O FC' =FP+PEE1 : .+27 +l. r 

h»fu. 256 fokes.l>: foieg-m h:: ne - .*: r pokes+24.8 poke^m?! 1*% le i 

9 0=200 Til: -000000" 
la C=1024 D-55296 
!» PO E 5 328! I*. 


12 POKE5d272-30 

13 PPINT U i-COPE HI "HI"LEVEL "LE 

14 PRINT"lHMr PPINT" T T t ! TT T TT T M t T T T T T T t T T 1111 T t T T T T T T T T" 

15 H-y B=*> OOSUB24 y< G0SUB24 

WIN I” OM" PPINT " 11T f t T11T T t T111 Tttt T T T T M T ITT T T T T T ? T T T” 

17 0=20 B*12 G0SUB24 

is ppint »mm ppint m ttrt tmtttTTtmimmimtttTmirr 

. 8=5 B=l8 G0SUB24 GOSU856 

- 1 - 1 P>E204O<215 PO E2041 21c- P0FE1042 -216 P0KE5 '.'26 ?. 7 F*QKE 53276 7 
21 PDF£‘_»3285 J POKE53236,8 PQKE53287.0 POKE532880 
2* 2=24 V»82 P0FE53248.;; P0KE53243.V M=ö PO» E53251,V FOE52252 V 
, < F •» £5 .,50 150 POKE53252.150 3VS5OO0 PPINT " I T T 11 “ GQT025 

24 F JPI=B*40TO« £+5 •♦40STEP4Ö POkECM+A 71 POKEB+I+fl.2 ME::T PETmRN 

25 1FPEEF» 1 97 • =50THENX*a+5 1 = 1 

26 IFPEEf l97;=42THENX*X-5 1=2 

27 1FPEEF d 9? >«60THENOOSUB40 

28 IF 255HNDM=0THENF01 £52264 FEEF • 53264 0R1 =0 M-l 

23 IF,: O0NBI1=1 THENP0KE53264 • PEE1'53264 >RND254 »255 N=n 

30 IF.. 740HDM=OTHENX=24 

31 1R068RNWN1 THENX«68 


P0KE53239 7 


32 

33 

34 

35 

36 

37 

38 
i9 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 
,58 

*>y 

61 

62 


IF« v «82flMK-: ; «WWKT-:SS«ltM*0>0P<v=82flNBX:>8flNDX<32FINIIV=82flNI»l«l THEI«r*it;'.o 

1FV= 130flNBX; 160FIND:: .131 THENG0SUB53 

IFV=178ftNBx: 4öflHDX<72THENOOSUB54 GOT063 

IFFEEF • 53H79'HUD1»1THEMGOSUB60 

PPINT"S"SC 

POFE53248X PGKE53249.V P0KE53251.V P0IE53253.V 

IFPEEF 1 147..THEH6E 

G0T02S 

POME2040 214 IFF »2THEN46 

FOP1-0TCI20 IF»r. 255THENP0F.ES3264.PEEF * 53264TOPI =C M=I 
P0KE5324S .>1 P0I.E53249.V-I IIEXT 1 W-I 
FOPI-ÖTO20 IFX+11 255THEHP0XE53264 • PEEK T53264>0P 1 =8 M=1 

POKE53248PCI E5324?. V+-I IIEXT X=»I V«V*J 
Fi)K£204e.215 PETUPN 

FOPUOTO20 IFX- I XOTHENPOTE532E4 PEEK<53264>fiHD2W X-255 11-0 
P0KE53248.X-I P0KE53249.V-I HEXT Y=V-1X*X-I 
F0PI-0TO20 IFX-I T0THEMPOKE53264.PEEK<33264--f*in2S4 X=255 M-0 
POFE53243-X-I POI£53249,V*I HEXT V=V+I X-X-I POI £2040 215 PETUPH 
I-M-1THEN52 

POFE5324S.76 X*76 G0SUB55 PETUPH 
P0KE33248,20 x-20 GIBUB55 PETUPH 
P0IE5324S.irS X=I76 G0SUB55 PETUPN 
PDF E53248.56 X=56 G0S.UB55 PETUPH 

POKE2040.215 FClPI-0TOE«S-l POI £50149. Y*I IIEXT V«V*I Fdl E70T0 211 PETUPl. 

m::=phd. 0.*4 Fon-oTOfi:. b:>phd. o »jo ifpees• c*r;M0»o.-t««THEM5 : ’ 
cx»ftHD'i.*5 poi ec+bx+o .cx poi ed*b:;.c i :. 

HEXT U="*. 40 IFO. 770THEHPETUPH 
OOT056 

P-C*. . X-24l/S>*< ( V-42 •. ‘8>T40+. <M*£56)X8.'+1 
IFPEEI <P.-äiORPEEI •P•=71THENRETUPH 
Si>SC*10»LE*PEEI'P. POP EP. 32 PETUPH 
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Program 1 läser in spritar och 
maskinkoden. 

Rad 5 sätter fram skärm till start. 
Tömmer skärmen. 

Rad 6-8 ljudeffekt 

Rad 912 sätter upp variabler och 
nollställer klockan. 

Rad 13-19 ritar ut banan. 

Rad 20-23 sätter igång spritarna, färg 
och position. 

Rad 24 subrutin ritar ut brandstege. 

Rad 25-39 sköter om styrning, att 
spelare är på planen om en kollision 
pågår. 

Rad 23 syr koden initierar 
maskinkoden. 

4045 hopp till höger, 

4649 hopp till vänster 

50-55 låter brandmannen glida utför 
brandstång. 

56-59 ritar ut saker för brandmannen 
att ta upp 

60-62 kollar om brandmannen går 
på något och i så fall ökas poängen 
och grejen suddas. 

63-65 om brandmannen lyckats ta 
sig till nedre delen så skriver dator ut 
bonus och ökar farten på eldslågorna. 

66-72 game over rutin och skriver 
score och hi-score, frågar om man vill 
spela igen. 


AV Mikael Fors 


•54 l; =lE + 1 FORI«etOS00O ME'T lFPEEt • 5ICC -OTHEtrOtE:‘:.ri: TEE! • 820; - 1 GOTO? 

•5S GOTO? 

*5 RORI*OTOISO R0.-E53281.I POPE53280.1 + 1 HE::T POKET3272 Zl IFSOHITHENHt-SC 
F.7 PORES3269.0 

f>iHT*nrTm<iS'>*6nc ovw wiht*» vau :ut-:c"poiht-. hi-ecore hi 

65 PRIHTTRBvl J -"IWHOTHER TRY?* 

r» Tfroi IRflE*'V*THEMSC*0 P0PE8202.5 GOTOS 

TI !FHi-"H"THEtlRiirES3288,H P»'ES3231 .+ >HH"r END 

T2 GOTOro 


. FY*ES6i33 Ur ROtEl.Sl 

2 F0»I«ÖTlMSS*8 ROR El+14336 ■ PEET 1 S324S+I • IIE::t 

3 Po«E1.55 P0KE56333.129 

4 ROR 1-3048T031*8-1 REHDA POKEI+14336 fl HEllT 
:• DAT AO . 2 55 , 96»56 ■ 96. 96 • 155 , ö 

r. FOFI =0T064* 3 -1 FEADA POkE 1S696-*-1. A NE::T 
7 FuPI*8192T&8326 PEADA PQkEI»A NEXT 
FO*1*5000TO501£ PEADA P0KEI,A NEXT 
i* FuRI*14336TQl4374 PEAIA POKEI,A NE .T 

10 POkE198.1 P0KE631,131 

11 DflTH O. 0. 0. ö. 60. 0. 0. 255, O 

12 DATA 0- 60. 0• O- 20. O, O. 34, 0 

13 DATA 1, 85. 0. 4, 84. 64, 32, 84. 32 

14 DATA O- 84. ö, 0, 34- 0. 1, 17, u 

15 DATA 5- i. 64, 4, 0, 64- 20, O- 80 

16 DATA 32. 0. 32. 160. 0 40. 0, 0- O 


17 DATA O. 0. O. O. y 0, 0, 0. 0.0 
13 DATA 0. 240. 0. 3. 252 O, 0. 24Ö, Q 
19 DATA O 30- 0. 1. 35, 0. 5. 84- 64 

29 DATA 17. 64. 64. 65. 64. 64- 33- 84. 12o 

21 DATA l- 34. 0. 1• 80 O- 1. 5- O 

22 DATA 0. 65. 0 0. 64. 64. 0. 64- 64 

23 DATA lö 0. 160. O, 0. 0- 0. O O 

24 DATA 0. 0. 0. 0. O, 0. 0. 0. y.0 

25 DATA ö- O. O. 0 0 0. ö. Ö. O 

26 DATA y. O. 0. O. O. 0. 0, O. 0 

27 DATA 0. 0, O. O. 130. 128. 162. 34. 44 

28 DATA 40 130. 176, 42- 2. 240 10. 11 152 

25 DATA 5. 175- 192, 2- 85- 128.- 0- 90. 0 

30 DATA 0. 40. O O. 0. 0. O, O- 0 

31 DATA 0, 0. 0. 0. 0. 0. 0. 0, 0.0 

32 DATH165•2■240.4.198,2,76,49,234,169 

33 DATA5.i 33 2.234,234,238 - 2,208.208,11 

34 DATAI73.16 208,9-2,141.16 208,76,58 

35 DA TA32•178.2.206• 201.65,288*20•17 3,16 

36 DATA208.41.2-240,13.173.16 208 41,253 

37 DATA141.16.238 169,24.141,2.208.206.4 

38 DATA208208.16-173.16.208.41 251.141.16 

39 DA TA208•169.255,141.4,208,76,106,32-173 

40 DAT A4.208.201 24 208.20-173.16.208 41 

41 DATA4.208.13-165.65.141.4.208.173.16 

42 DATA208 94.141.16,208.173.30.208.41 

43 DATAI.240.10.141 - 30-208.169 255.133-147 

44 DATA76,49.234.169,0,133-147,240.247 

45 DA TA120•169-0-141,20 . 3-169 , 32,141 21 3,88-96 

46 DAT AO.8•28•62.34.j8.28.28. 23 62.126.126•126-60.28 

... DATh 40 40.108, . .124.124,108.108.108* 108,108 12 26 60• 126■ 126 
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PL»E 3686*. 255 
P0KE8185,169 
135 PPINT"*3I i-TIfg 

140 GPRPHIC-209 0-7980 
145 MINE*160 B-l1 
150 V-8142 
155 Z*5 

160 CL a 0 P0KE36878-15 
165 X-8142 30UND=36876 
170 V-15 
175 LC=*0 
180 C-0 

185 * EYS-PEE1' » 19?.> 

190 IF»-evS«47THEMC*l GPflPHIC-5? 

195 IFKEVS»39THENi;«2 6P0PHIO58 

280 IFKEVS-33THEM03 GRftPHIC=60 

205 IFFEVS=26THENC*4 0P8PHIC-61 

210 IFC-1THEM8-FH22 P0KE8-22+B 160 

215 IFi>2THEf«»R-22 PO* E0+22+B • 160 

220 IFC=3THEN8 a B-l POKER*B+l.160 

225 IFC«4TH£NB=B-M P01 Eft+B-1.160 

2 38 IF8*7702THEHC* 1 GPfiPHIC*59 ft*0+22 

235 IF0»S164THENC«2 GR0PHIC-58 0»0-22 

240 IFB=0THEMC=4 GRftPHIC-61 B«B*1 

245 IFB-21THENC-3 GP8PHIC=60 B«*B-1 

250 IFPEEK•Fr*-B' = 174THENPOKE0>6.215 GOTQ405 

255 POKER*B•GPRPHIC 

260 CL*CL*1 

265 LC-LC+1 

270 IFCL-2 rHEMG0SUB295 

275 1FLC=?THENG0SUB35Ö 

280 PRIHT-83 ■“TlfJ 

285 IFPEEK-0+B*=174THEM405 

290 GOTO185 

295 KM-INT<24PMB»1>) 

300 IFKM=0THEMMIHE»174 


TILL VIC-20 


Fredrik Holm i Åbo i Finland har skickat oss ett trevligt 
spelprogram till Vic-20. Han har arbetat med Vic-20 sedan 
nyåret 1983 och är omåttligt intresserad av datorer. 

Spelet går ut på att du har blivit inspärrad i en begränsad 
rymdarea med två (JFO:s. Snart märker du att det bästa som 
dessa (JFO:s vet är att förgöra dig. Minsta beröring och döden 
är oundviklig. Du måste alltså undvika dessa så länge som 
möjligt. Klockan längst upp på skärmen mäter tiden som du 
klarat dig. 

Spelet försvaras av att dessa (JFO:s förföljer dig samt 
planterar ut småplaneter vilket gör spelet till ett slags 
rymdslalom. Man kan inte fly bort från arean eller åka på de 
små planeterna, då upplöses man i antimateria. Klarar man sig 
över en minut är det bra. 


siSW 




av 


of O' 


Programmet är uppbyggt med variabler som säger vad 
gör. Att texten är engelsk i spelet beror på att jag saknar Å Ä 
och O på maskinen. 


Av Fredrik Holm 


5 POkE 36869.248 

f* E358? S'8 PRIHTTrtaMiWiTiWiiTRO RUM" POKE36878.15 
io WV^TOXSTEP-l POKE36877 V MEKT NEXT FORIMTO60 NEXT 

f* ™?ir 1T 9 88 ** T P0KE36377.8 PPINT"».- 

to ISJt! FROM THE UPÖS HMD THE1R BLH3T 1 kOtl TIME"" 

■?DOWN" T 1 ®' UP " PRlMT"«hPiräMT-sr« *:»-LEPT" PRIMT «*MAM*M* 

35 PRINT 1 KBAUETmPT MITH ONY KEV" WHIT136.I 
40 REM SPECIALTECKEN 
45 F0RU7552T07671 REfiDH POKEI .8 NEXT 

f® 182.lOiiOi,lie,126.56.56.24.34.24.24.60.60 

» ,26 ' 12é ' 12é - *26.6,126.126.6 126.126 
£S SSISfi’- 9 ?; 108.108.126.126.12.12.126.126,36. 126.126,6.126,126 
70 52J2 ff' Jf?-ff;>ff’.12P’102 126,126 126,126 102, 12.24,48,48,48 

if l ? Ä ' 1B2 ' >»•«»*«»- 12ö. 182,126,126.6.126.126 

fiO t 2 -: 1 f®• 1 F6■* 26•66,66.126 126 60 68 60,24 24 

*® 5RrR®' 7 - 6 2.254.254,62.7 8 0.224,124.127,127,124.224,8 
85 DRTRtJ.bO. ic6.171.213. 126 6ö 0 
98 PPINT-nM 


505 IF8 VTHENV-V+1 P0KEX*Y-1 .MlME PO* ESOUND, 220 
310 IF8 : THEMX-X+22 P0KEX-22+V.160 POKESOUND.225 
315 IF8 IXTHENX-X-22 P0KEX*22*V • 160 POKESOUND. 230 
328 IFB VTHEMV-V-1 P0KEX*V*1,160 POKESOUND 235 
325 POKE»V.62 
330 CL*0 POKESOUND.0 
335 MIME-160 
340 IFX*«fiNDV-BTHEM405 
345 RETURN 
350 *M-IMT«2«HD<1>> 

355 IF* M-0THENW NE-174 
360 IFB>ZTHENZ“2*1 P0KEV*Z-1,160 
365 IFfl>VTHENV«V422 POkEV-22*Z.160 
370 IFfKVTHENV-V-22 P0KEV+22*Z■160 
375 IFR<ZTHEN2»Z-1 P0KEV*Z+1. PIINE 
380 POkEV+Z.62 
385 LC-0 
3*0 MINE-160 
395 IFV»«*ND2*BTH£N405 
400 RETURN 

4Ö5 POKEV+Z.209 POKEX+V.20? 

410 POkEP» B.209 _ 

415 PPINT ' »imBWIOWIW^AT^KRME OVEP" 

420 PPINT 0AiM&Mi1RRGRIN(V/N)? H 
425 06TR4 IFM»-N"TMEMPO»'E36869.240 P0KE36879,27 PRINTT 
4.30 I Fflf»'' V" THENRUN 
435 POKER+B.215 
440 FORT-1TO10 *€XT 
445 GOTO410 
458 PEM <C) F.MOLM 
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TILLBEHÖR 

TILL 

DATORER 

VIC 20 ABC 80 
ECB: 


*MINNESKORT 
*RELÄ KORT 
*EXPANSIONSKORT 
*ANALOGA KORT 
MM: 

>•••••••••••••••••••< 

STYRDATA SYSTEM 
INDUSTRIG. 11A 
781 50 Borlänge 
0243/82864 


-. 

SPECTRUM 

JOYSTICK/INTERFACE 

Programmerbart joystickinterface 
som fungerar med alla spel på 
marknaden! Programmeras snabbt 
och enkelt och har uttag som pas¬ 
sar för de flesta joysticks. 

Pris endast 455 kr. 

QUICKSHOT joystick med hand¬ 
tag och två avfyrningsknappar. 

Står stadigt. Pris 145 kr. 

ZX81 16K Ram i låda + gratis spel¬ 
kassett 395 kr. Ram utan låda 
295 kr. DEFENDER, spelet som ger 
högupplösande grafik utan tillsat¬ 
ser! Endast 75 kr. 

VIC 16K RAM i ABS plastlåda. Växlingsbart mellan 3,8 och 
16K Ram. 6 mån garanti. Endast 595 kr. Arkadspel i m/kod 
på kassett: ARCADIA, WACKY WAITERS, CATCHA SNAT- 
CHA, FRANTIC och CENTIPEDE. Endast 79 kr/st. 



Alla priser inkl. moms. Porto tillkommer. Gratis katalog över 
hela vårt sortiment mot dubbelt porto. ÅTERFÖRSÄLJARE 
SÖKES. 



Box 19017 25019HBG PG 74 65 21-4. TEL. 042-922 29. 


V 


J 



Pylator distribuerar 
spel och nyttopro- 
gram från de ledande 
tillverkarna. Exempel¬ 
vis: 

synapse 

I CREATIVE 
I SOFTWARE 


WBrrjderbund 
1 UizillL 


HesWare 


Human 
Software, 

USAs största och bäs¬ 
ta tillverkare av spel 
nyttoprogram och 
tillbehör till VIC-dato- 
rer. 


Marknadens bästa 
flygsimulator till Com- 
modore 64. 3 dimen¬ 
sionen, 80 olika flyg¬ 
platser, fullständig in¬ 
strumentering, öva 
start, landning, flyg¬ 
akrobatik. Välj mellan 
olika förhållanden - 
moln, dimma, natt, 
dag etc. Inkl. flyg¬ 
handbok, kartor m.m. 




Svensk-tillverkade 
spel och nyttopro¬ 
gram till VIC-20 och 
VIC-64 på kassett till 
vettiga priser. Från 
69:-. Samtliga pro¬ 
gram köres på oex¬ 
panderade datorer. 


Pylator AB distribue¬ 
rar Sybex välkända 
datorböcker i Sverige 
Förutom Sybexböc- 
ker har vi ca 100 olika 
titlar, allt från spel till 
maskinspråk. 

COMPUTES! S FIRST 
BOOK OF C0MM0D0RE 
64 GAMES 

De bästa spellist- 
ningarna som publice¬ 
rats i Computel 19 st 
mycket avancerade 
spel, helt färdiga att 
köra. Samtliga pro¬ 
gram är testade. Spe¬ 
len har fantastisk gra¬ 
fik och mycket fines¬ 
ser. 


COMPUTESIS FIRST 
BOOK OF ATARI GAMES 

15 st mycket bra spel¬ 
program. Samtliga 
spel har förbättrats 
och utökats sedan de 
publicerats i Compu- 
te! 5 av spelen är helt 
nya. Boken innehåller 
även tips hur man själv 
konstruerar program. 

COMMOOORE 64 PRO- 
GRAMMERS REFEREN- 
CE GUIDE 

Ett måste för alla VIC 
64 användare. Detta är 
originalet som ligger 
till grund för ev. över¬ 
sättningar. Allt från 
grafik till maskln- 
språksprogrammerlng. 


/L 


SYBEX 


THE COMMOOORE 64/ 
VIC 20 BASIC HAND¬ 
BOOK 

Boken beskriver ingå¬ 
ende alla Comr-Hn. 
resbasickoiumandon. 
Läsaren får tips och 
idéer hur man mest 
effektivt utnyttjar ba- 
sicspråket. Rikt illu¬ 
strerad och mycket 


pedagogiskt skriven. 

v .. PYLATOR AB. 'TEL 08-2311 05. 
^VASTMANNAGATAN 8. 111 24 STOCKHOLM. 

Våra produkter finns att köpa hos återförsäljare över hela Sverige 
Kontakta oss för återförsäljarförteckning! 
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Nu börjar läsarprogrammen 
strömma in till redaktionen. Våran trogne 
brevbärare hotar med strejk om 
han inte får hjälp! 

Vi kommer regelbundet att presentera program från våra läsare 
och struntar fullständigt i alla protester från kungliga Postverket. Kanske' 
blir det ditt program som publiceras i nästa nummer av ”Allt 
om Hemdatorer”. Förutsättningen är naturligtvis att du skickar oss dina 

alster. 

Från Roger Blom i Farsta har vi fått en hel kassett med trevliga och under 
hållande spel och nyttoprogram. Vi bestämde oss för att presentera hans 
datoriserade variant av YATZY. 

Detta program innehåller mycket grafik. För att förenkla inknappandet har 
vi skrivit ut alla grafiska tecken med små understrukna bokstäver. 
Spelet består av två program. Del ett definierar upp grafiken och del två 
är själva spelet. En subrutin förekommer. Den ligger på raderna 1000- 
1110 och ritar ut tärningarna. 
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I ie FOR r.*=l TO 19: REPD p* 

20 FOR »=e TO 7 
30 REPO a: POKE USR pt-»n,a 
40 NEXT m: NEXr n 
60 DPTP "a",O.0,63.63,51.51,63.63 
70 DPTP ,, b“. 51.51.63,63.31.51.63.63 
80 DPTP "c\0,0,255,255,243,243,255,255 
90 DPTP ”d\63,63.63.63,51.51,63,63 
100 DPTP V, 243.243,255,255.243,243,255.255 
HO DPTP " f“, 253,255,255, 255,243.243.255.255 
120 DPTP "g",255,255,255,255.255,255.255.255 
130 DPTP "h\O.0,63.63,63,63.63.63 
140 DPTP "i".63,63.63,63.63.63.63,63 
150 DPTP "j“.0,O,255,255,255,255.255,255 
160 DPTP “k-.63,63,255,255,255,255,255.255 
170 DPTP "1".8 . 0.23.34.62.34.34.0 
160 DPTP "nT,20.0,28,34,62.34.34.0 
196 DPTP «n\63,63,255.255,243,243.255.255 
20O DPIP "o".24.24,24,24,24,24,24,24 
210 DPTP H p M ,24.24.24,31.51.24.24.24 
228 DPTP "q",0.0,0,255,255,0.0.O 
230 DPlP "r“.24,24,24,255.255,24,24,24 
240 DPTP “s",24.24.24.248.248.24.24.24 
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2a 


INF 9; AT 4.2?;" 


19 DIM a*,4, lö>! MM cfi2>: MM df<2>: MM s<5> 

28 DIM «fi4.l6>! DIM af <18>: DIM bti21>: DIM -ö* 

38 BORDER c: PAFRR 6: CLS 

31 Fijk n=W »O 28 

32 PRINT AT n.9; INK 2;“ o o o £ c o" 

34 PK INI 81 7.9; INF 2;" .x^cfaqqqr qqqqqqqrqqqrqqq? " 

35 PRINT AT 19.8; INK 2; " p-^qqqqqq^qqqq-^q^qqqf qq'-3^' 

56 PR 1 NT AT 0,3; INK 4; ,, RlJfc:Vll' ' ' “ ' -- 

3? PRINT AT 1.1; INK 8;"l";AT 1.3; 

38 PRINT NT 2,1; INK 9; •'2";NT 2.3; 

39 PRINT NT 3,1; INK 0;"3";AT 3.3; 

INK 8;"4";NT 4.3; 

INK 0;"5";NT 5,3; 

INK 0;"6”;NT 6.3; 

INK 8;"SUMMA";AT 7.27;"2" 

INK 3;"BONUS" 

INK O; "7";AT 10,3; INK 1;"I F*AR" 

INK 8;"8";AT 11.3; INK l;"2 PAR" 

INK 8; "9";AT 12.3; INK 1; "TRETAL" 

INK 8;"10";NT 13.3; INK 1;"FVRTAL" 

INK 9;“11";AT 14.3; INK 1;"L.STRA. 

INK 0;"12";AT 15.3; INK 1;"S.5TRA. 

INK 9;"13";AT 16,3; INK 1;"K1K"; INK 0;ftT 16.27;"5" 
INK 8;"14";AT 1?.3; INK 1;"CHANS" 

INK 0;"15";AT 18,3; INK 1;"VATZV" 

INK 8;"SUMMA" 


INK 1;"ETTOR" 
INK 1;"T'-»OR" 
INK 1;"TREOR" 
INK 1;"FVROR"; 
INK l;"FEMMOR" 
INK 1;"SEXOR" 


INK 0;AT 10.27;"3" 


INI 8; AT 13,27: “4" 


2b 


40 PRINT AT 4,1 

41 PRINT AT 5,1; 

42 PRINT AT 6.1; 

43 PRINT HT 8,3; 

44 PRINT AT 9,3; 

45 PRINT AT 10,1; 

46 PRINT AT 11.1; 

4? PRINT AT 12.1; 

48 PRINT AT 13,0; 

49 PRINT AT 14,0; 

58 PRINT AT 15.8; 

51 PRINT AT 16.8; 

52 PRINT AT 17.0; 

53 PRINT AT 18,0; 

54 PRINT AT 20.3; 

82 FOR y*l TO 4: FOR b=l TO 18 

83 LET a<v,b>=8 

84 NfcXT bs NEXT v 

85 FOR TO 4 

86 LET et(v>=" 

8? NEXT v 

90 1NPUT "HUR MJN6A SPELARE <ma*4> ^";c 
180 IF c<I OR c>4 THEH 00 TO 98 
110 PRINT AT 21.0;"NAMN P^ SPELARE NR " 

128 FOR v=l TO PRINT AT 2l,19;v: INPUT af 
130 LET bf<<^*3) TO <v*3>*2>=af < 1 TO 3); NEX1 v 
148 FOR v»l TO c: PRINT AT 0,7*(v*4>;bf<fv*3) TO <v*3>*2> 

158 NEXT v 
160 FOR t*l TO c 

165 FOR u*l TO 5; LET s<v>=9: NfcXT v 

166 GO SUS 1008 

178 PRINT AT 21,0;bf <<t*3> TO U*3>*2>|" KASTADE 
198 FOR b=l TO 3 

200 FOR u=l TO 5: IF s<v>=9 THEN LET s<v>*i«-INT <RND*6) 

288 NEXT 
210 60 SUB 1008 
>30 PRINT AT 21.12;"KAST ";b;" 

315 IF b=3 THEN 60 TO 430 
328 INPUT "UILKA SKALL KASTAS OM?"; rf 
338 IF LEN if=0 THEN 60 TO 430 
350 FOR v=l TO LEN it 

355 FOR h=l TO 5 

.60 IF if«v>=STRf h THEN LET *<h>=0: 60 TO 410 
365 NEXT h 
410 NEXT v 
415 60 SUB 1800 
428 NEXT b 

440 BEEP .12,38: INPUT "Uj^J RUBRIK <1 TO 15> *>";u 
445 IF u<l OP U>15 THEN .50 TO 448 
450 IF *t<t.u>*"x" THEN 60 TO 440 

455 IF .X=6 THEN 60 TO 478 

456 FOR o*l TO 6; LET x<v>=0: NEXT o 

45? FOR o-l TO 5: FOR y=l TO 6: IF s(o>=*y THEN LET x<y>=xty>-*-y 

458 NEXT y: NEXT o 
4*0 60 TO <<>*468> 

470 FOR o*=l TO 5: IF s<o>=o THEN LET a<l,u)=a<t,u>*u 
475 NEXT vii LET a< t, 16>=a< t, l6Xa< l.u> 

480 60 TO 600 

516 FOR o=*6 TO 1 STEP -1 

517 IF <<o>>»2*v THEN LET a<t,7>=2*o: 60 TO 519 
513 NEXT u 

519 LET a<t,18>»»(t,18>+a<t.?> 

528 60 TO 688 

524 LET z=0s FOR o*6 TO 1 STEP -1 

525 IF ,<v»^2*o THEH LET a( t,3)=a< t,8>X2*v>: LET z=z*i 

526 NEXT o: IF z<2 THEN LET a<t,8>=9 
52? LET a<t.l8>=a<t,l9>+a<t,8) 

528 60 TO 680 

532 FOR o=6 TO 1 STEP -1 

533 IF x<o»=3*o THEN LET a«.t.9>=3*o; 60 TO 535 

534 NEXT o 

535 LET a<t.f8>*aU,18>+a<l.9) 

536 60 TO 608 

540 FOR o=6 TO 1 STEP -1 

541 IF *<o>>=4*o THEN LET a<t,18^4*o: GO TO 543 

542 NEXT o 

543 LET a< t, 18>=a<.t, l8>+a( t, 10) 

544 60 TO 608 
548 LET y=l 

‘.49 FOR o=l TO 5: IF £(v>=y THEN LET y=y-M: 60 TO 549 
558 NEXT o: IF y=6 THEH LfcT a<t,ll>*15 

551 LET ad, 18>*a<t.18Xa<t, 11 > 

552 60 TO 688 

556 LET y*2 

557 FOR v=l TO 5: IF s(o>=y THEN LET y=y-M: 60 TO 557 

558 NEXT o: IF y»7 THEN LET ad.I2>«20 

559 LET a- t, 18> = a(t. 18>+a<t, 12) 

568 GO TO 680 

564 LET y=0: LET z=9: FOR o=6 TO 1 STEP -1: IF x<v>/o«3 THEN LET z=3*o 

565 NfcXT o* IF z=0 THEN 60 fO 563 

5*6 FOR o=6 TO 1 STEP -1: IF tv>^=2 THfcN LfcT y=2*v; IF */=z^3 THEN LET y=9: 60 

TO 56? 

5o? NEXT o; IF y=Ö THEN 60 TO 568 

568 IF y>0 THEN LET ad.13>*Z*y 

5*9 LET a< t, 18>*ad, 18>*a< t, 13>: 60 TO 680 

572 LET z=8 

573 FOR *«=1 TO 5: LET z=s(o>+z: NEXT o 

5. 4 LET a« t. 14>=z: LET a< t. 18>»a< t, 18>*ad. 14> 

575 60 TO 600 

580 FOR 0 =* Ty I STKP -1 


581 IF x<v)=(5+o) THEN LET ad,15>=59 

582 NEXT o 

583 LET a< t,18Xa< t,18>*a<t,15) 

600 LET efu,u) 8 "x" 

618 IF u>6 THEN 60 TO 640 

629 IF aU.uXie THEN FRI NT AT u.9+M*4);a( l.u>; 60 TO 670 

630 PRINT AT o,8*<t*4>>a<t,u>: 60 TO 678 

640 IF a* t,uK10 THEN PRINT AT u+3 ( ‘4(t*4);a<t.u)i 60 TO 679 
658 IF a<t,u)<180 THEN PRINT AT u^3.8+<t*4>; *< l.u): 60 TO 670 
668 PRINT AT u*3,7*< t«*4>;a< t.u) 

670 IF ef* t,I6) = "x" THEN 60 FO 690 

689 IF efd.l TO 6>«"xxxxxx" THEN 60 TO 729 

698 IF t=c AND *?f<t,l TO I6>="xxxxxxxxxxxxxx>x" THEN 60 TO 750 
780 NEXT v 
719 »30 TO 160 

729 IF a(t,16»=63 THEN LET a<t,17>=59 
738 LET ef<t,16>="x" 

731 FOR v=16 TO 17 

732 IF a<t,v><10 THEN PRINT AT v-8.9*U*4>;a(t,w>; 60 TO 735 

733 IF a' t,w><l00 THEN PRINT AT V-6.8-K t*4>;a< t,w): 60 TO 755 

734 PRINT AT v-8. ?+< t^4);a<t.v> 

735 NEXT u fc 
749 60 TO 699 
758 FOR t=I TO C 

769 LET aii,18>"a<i.l8)*a(t,16)+a(i,17> 

778 IF ad, 18X10 THEN PRINT AT 20,9*( l*4>;a< t. 18>: 60 Tu 880 
788 IF ad, 18X108 THEN PRINT AT 20,8 -h t*4 >;a< t, 18>: 60 TO 808 
790 PRINT AT 20,?♦(t*4>;a<I,13) 

890 NEXT t 
885 STOP 

1900 FOR o=l TO 5 


1010 

IF 

s(v>=0 

THEN 

LET 

cf=" "s 

LET 

df=" " 

1020 

IF 

S<U>=1 

THEN 

LET 

ct=**h ii "s 

LET 

■Jf=" i j " 

1930 

IF 

s<v)=2 

THEN 

LET 

cf="h<": 

LET 

df="3q'' 

1040 

IF 

s».v)=3 

THEN 

LET 

cf="h*r": 

LET 

• j f "TT' 1 

1050 

IF 

sCu)=4 

THEN 

LET 

: 

LET 

df= M dT" 

1060 

IF 

s(v)=5 

FHEN 

LET 


LET 

df = "'3n " 

1070 

IF 

stu>=6 

THEN 

LET 

cf="ac": 

LET 

df= M iifc." 


1088 PRINT AT v*3,29;ct 
1990 PRINT AT <u*3X1.29;dt 
1180 NEXT w 
1119 RETUPH 









Data Huset ST0RST UTVALG I LANDET 

SEND ETTER PRISLISTEN - DEN INNEHOLDER OVER 2 500 PROGRAMMER 



PRACTICALC 

Endelig et fullgodt 
kalkulasjons-program for 
Commodore 64 og VIC-20 
til en rimelig pris. 

Bruk den til kalkyler, 
budsjett, regnskap, lister, 
översikt osv. 

20 matematiske 
funksjoner. 

Sortering av tall og ord, 
soking osv. 


epyx 


\ 



JUMPMfiN 


JUMPMAN 

Vårt mest popula&re spill 
til Commodore 64, og den 
er det med god grunn: 


— 30 brett 

— Fengende musikk 
— Utrolig grafikk 
— Veldig goy å spille 

Hvis du vil ha noe av det 
beste til Commodore 64, 
så er dette spillet du 
leter etter. Enkel å laere - 
umulig å mestre. 


Commodore 64 kass/disk 
VIC-20 kass/disk 


Kr. 450 
Kr. 350 


Fåes til: Commodore 64, Atari, Apple II og IBM PC 
Fåes på disk og kassett Kr. 348 



CRAZY KO» 


jNTencfpro* 


CRAZY KONG 

En etterligning av spillet 
Donkey Kong. 

Din oppgave er å redde 
jenta di fra en gal gorilla 
som triller olje-tonner 
etter deg mens du prover 
så godt du kan å klatre 
opp en bygning. 

Et rimelig spill med bra 
grafikk og lyd. 


For Commodore 64 og VIC-20 Kr. 74,- 



SARGON II 

Spill sjakk som aldri for, 
mot en verdig motstander. 
Data-sjakk mesteren, 
Sargon II vil spille på ditt 
nivå, fra ny begynner til 
Grand Master, 7 nivåer i 
alt. Sargon II er rask og 
toff. Kjempegod grafikk. 


Apple II 


Disk/kass 

Kr. 

312,- 

Atap 



Disk/kass 

Kr. 

312,- 

Commodore 64 



Disk/kass 

Kr. 

312,- 

VIC-20 Modul 

Kr. 

165,- 



FLIGHT SIMULATOR II 

Sett deg i pilotens sete i en «Pipe 181 Cherokee Archer» og opplev 
en flytur i realistiske scener fra New York til Los Angeles. Animert, 
hoy-grafikk vil gi deg flott utsikt mens du trener på å ta av, lande og 
luftakrobatikk. FLIGHT SIMULATOR II har ■ Animert 3 D farge 
grafikk ■ Dag, skumring, nattflyvmng ■ mer enn 80 flyplasser i 4 
scene områder: New York, Chicago, Los Angeles, Seattle ■ Bruker 
variabel vaer fra skyfri himmel til overskyet ■ Flyinstrumenter 
■ VOR, ILS, ADF og DME radio-utstyr ■ Navigasjon og kurs- 
beregning ■ + mer Kr. 432,- 


IBM PC 

Disk 

Apple II 

Disk 

Atari 

Disk 

Commodore 64 

Disk 


Data Huset 

POSTBOKS 253 Tlf. (043) 46 401 

4580 LYNGDAL 


□ JA, send meg prislisten — gratis 


Jeg vil bestille 


Navn: _ 

Adresse: _ 

Postnr./sted: 
Type maskin: 


O PRACTICALC disk/kass 

D JUMPMAN disk/kass 

□ CRAZY KONG kass 

D SARGON II modul/disk/kass 

□ FLIGHT SIMULATOR II disk 
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Kontakt din forhandler, eller oss direkte. 

Hvis du ikke vil klippe i bladet, kan du ringe oss eller skrive på en lapp. Husk navn og adresse. 























•#•••• ••••••• ••••#•• ••••••• 

###### ••••••• #99 999 9999999 

•••#•# ##•#• ••• #••••# 

Senaste nytt från Riko Data 




PANIC 16 /m 

Ett fulländat 
grafikspel 

Pris: 99:75 



3D-TUNNEL 16/m 

Elt fartfyllt 
grafikspel. som 
kräver snabba 
reflexer 

Pris: 99:75 



TIMEGATEm 

En avancerad 
vidareutveckling 
av StarTrek 
Action i realtid. 

Pris: 109:75 


PROGRAM FOR ZX SPECTRUM 


For ZX SfJtctrum «K 



GULPMAN 16 /m 

15 olika labyrinter. 

Pris: 99:75 



QUEST 

ADVENTURE »8k 

Ett fascinerande 
äventyr med full¬ 
skärms grafik. 

Pris: 99:75 



TYRANT OF 
ATHENS 16/4IK 

Etl krigs-strateg»- 
och simuleringsspel 
Du för kommandot 

Pris: 89:75 



PHEENIX 16 /m 

En helt ny 
generation av 
Invader. 

Pris: 89:75 



30 SPACE 
WARS 16/m 

Du sitter i ett |akl skepp med 
instrument.stor vindruta Ett 
snabbt action spel Full grafik 

Pris: 99:75 



REOWEED m 

Försvara torden 
taktik och strategi- 
spel. Grafik 

Pris 89:75 



SENTINEL 16/m 

Eli hisnande rymdspel 
Full grafik med verklig 
action 

Pris: 9150 



TRANSYIVANIAN 

tower m 

Ett äventyr i 
kusliga labyrinter 

Pris: 109:75 



JOGGER 16/*8k 

Utmärkt grafik. 
Försök ta dig över 
motorväg och åar 

Pris: 79:75 


NYTTO PROGRAM FÖR ZX SPECTRUM 




(g HUTHROW 


HEATHROW *8k 

Det bästa och mest 
verklighetstrogna 
simulationsspelet tor Spectrun 
Mycket komplext. 


Strategispel 
Försök leda ett 
Flygbolag. 

Pris: 79:75 





MORIA m 


Avemyrsspel 
Följer boken 
"Lord of Rings" 
Grafik 

Pris: 79:75 


TASWORD 2. 48k 

Ett komplett ordbehandlingsprogram för Spectrum 48k. 64 tecken 
per rad. Kan kopplas till ZX- skrivare eller via serieinterface. 

HELT PÄ SVENSKA INKL. Ä, Ä och ö. Pris: 229:- 

MATCALC 16&48k 

Kalkyleringsprogram med svensk bruksanvisning. 

PRIS: 109:75 

MASTERFILE 48k 

Generellt redovisnings-, sök- och rapportsystem. 

PRIS: 239:75 


RIKO DATA 

tillverkar mer än 200 program för de flesta hemdatorer. Ou har väl 
vär 50-sidiga katalog. Du fär den gratis. 

RIKO DATAS program finns i alla välsorterade databutiker bl a 
Domus. Jostykit, USR Data, Datamäklaren m fl. 

Moms och porto ingår i priset. För order under 200:—tillkommer 
exp. avg. 10:—. 


Tel 040-44 07 37 


•Riko Data 


Tel. 040-44 07 37 


Box 2082, 23041 Bara 











































'JU/* 





ett spel om 


• • »Detta program togs 
fram under experiment 
med CBM-64:ans stora gra- 
fikmöjliqheter. Tyvärr sak¬ 
nas ljud, men den kunnige 
kan säkert lägga in de 
ljudeffekter som behövs. 
Du skall landa med din 
luftballong på piratskep¬ 
pet, övermanna piraterna 
och ta skeppet. Piraterna 
har en kanon och gör allt 
för att sänka din luftbal¬ 
long i havet. Du styr med 
ioystick och skall landa i 
fören på båten där en pil 
markerar landningsplats¬ 
en. 

Programförklaring: 

RAD: 

10-40 sätter ut kanon och 
initierar riktningen på ka¬ 
nonskotten. 

106 Färgval. 

107 Initieras 

108 Poäng variabel noll¬ 
ställs 

109 Initiering av maskin¬ 
kod, klocka och poäng 
värde 

110 V=början på video- 
chipet 

120 Pekare till sprit areor 
och kanonkulas position 
initieras 

130 Gör sprite 0 synlig på 
skärmen, väljer multicolor 
mod samt dubbel storlek i 
x- och y-led. 

140-165 Sätter position på 
sprite 0 (ballongen). Multi¬ 
color färgval samt sätter 
ut tecknet "vänster pil" vid 
landningsplatsen. 

170 Läser in värden för 
riktning och start position 
på kanonkulan. 

190 P$" = positionsva- 
riabel. "S$" suddar ka¬ 
non. 


195 Kanonbilder 
200 Början på huvudloop 
och kollar om kanon skall 
avfyras. 

205 Blinkar pilen vid land¬ 
ningsplatsen 

210 "BX"= X-värde för 
ballongposition. "BY"= 
Y-värde. "JY"= joystick- 
värde. 

220-255 Flyttar ballong 
260 Kollar om ballong en 
är träffad av kanonkulan 
270-280 Kontrollerar om 
ballongen landat och hop¬ 
par till start av huvudloop. 
500-550 Kontrollerar om 
ballongen landat korrekt 
eller i sjön. 
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pirater! 

600-710 Demolerar ballo¬ 
ng och sänker den. 

1000-1030 Läser in ma¬ 
skinkods rutin 
1040-1090 Initierar sprites. 

1900 Ritar ut skeppet. 

3000-3050 Initierar varia¬ 
bler för skott riktning och 
start. 

4000-4050 Skriver ut ru¬ 
brik. 

Programmet använder en 
kort maskinkodsrutin som 
kallas interupt, vilket görs 
600ggr./sekund för snabb 
förflyttning av kanonkulan. 



1 GOTO100 
10 RX=RND ( 0 ) #3+ • 3 

20 PR1NTP* • TAB<22>S», P», TAB<22) , A*< fC/.) 

30 POKE1022, Y<RX> : POKE1023,XCRXJ POKE V+2, SXCRX > POKEV+3,SVlRX; POKEV+21,3 
40 RETURN 

100 PRINTCHR*U42>,CHR*<81 
106 POK E33248+32, 7■ P0KE53248+33,4 
10? GOSUB1900 GOSUB4000 GOTO530 

108 P0KE?84,0 : POKE785,0 

109 OOSUB1000 GOSUB1900 SYS 1005 TI *=" 000000 " SC=PEEK 1784 J +PEEK C 7831 *236 

110 V=53248 V=V X=V+1 JR-36321 RX»RND<-TI> 

120 POKE2041U POKE2040,13 POKE1023.0 POKE1022,0 
130 POKEV+21,1 POKEV+28,1 POKEV+23,1 
140 POKEY,170 POKEX,50 

150 POKEV+37,6POKEV+40,2PQKEV+38,11 RX=PEEK<V+30> RX=PEEK<V+31> 

165 PB=1839 POKEPB/31•P0KE56111,1 
170 GOSUB3000 

190 P*=''«»lB«iti(l««IO««I«M«W««OWl 1 ' 34* "51 


= "31319 * 11131 . . 


"Aryanisi.. ■ 


195 A*<1 >»"434*11. . “ A*<0> = "*1I5U-.R*<2)« 

200 IFN0TPEEK<V+21>AND2THENGOSUB10 
205 POKEPB,63-PEEK(PB> 

210 BX=PEEK<.X> : BV=PEEK < V > : JY=31 - ( PEEK < JR > AND31 > 

220 IFBX>50 AND(JVAND1>THENPOKEX, BX-2 
230 I FBX<200FlND < JVAND2 > THENPOKEX, BX+2 
240 IFBY325 AND < JYAND4 > THENPOKEV, BY-2 
250 IFBY<250AND < JYAND8 JTHENPOKEY,BV+2 
255 IF<JYAND1>»0THENPOKEX,PEEK<X) + 1 
260 IFPEEK1V+30 > THEN600 
270 IFPEEK < V+31>AND1THEN500 
273 PRINT"«1'IME “RIGHT*<TI*,2>, , "SCORE^"SC 
280 GOT0200 

500 IFINT<BX/4;»43ANDINT<BV/4>»29THEN520 
510 GOTO540 

520 PR i NT " WBMttBIMBIM" TAB <13>" »YOU MADE IT!! “ BX=30-VAUT1*>+SC/10 

521 IFBX<0THENBX=0 

522 SC=SC+BX : GOTO700 

530 PRINT "MMIWäkFOR GRME STRRT,PRESS «3FIRE'ÄJjR 398PRCE" • GOSUB4000 
535 IFPEEK <197 ) =60THENCLR GOTO108 
537 GOT0535 

540 1FBX>=200THENPRINT"«*W««IIW«W««*1"TRB<15>"1HELP I'N DR0WNINGI !" GOTQ530 
550 GOTO200 

600 FORI-836TO860STEP2:POKEI,RNB<1)*256:NEXT 

610 FORI-BXTO200 POKEX,I:FORT=5TO20-<1/103 iNEXT NEXT BX=200 = GOTO540 
700 PRINTTRB(15)“P0INT“BX : IFSC<0THENSC»0 
710 P0KE784,SCRND255 P0KE783,SC/256 : CLR GOTO109 
1000 FORI=960TO1017 READA POKEI,fl NEXT 

1010 DATA 169,2,45,21,208,240,35,56,173,2,208,237,255,3,240,18,141,2,208,56,173 

1020 DATA 3,208,237,254.3,240,6,141,3,208,76,49,234 

1025 DATA 173,21,208,41,253,141,21,208,76,49,234 

1030 DATA 120,169,199,141,20,3,169,3,141,21,3,88,96 

1040 F0RI*832T0894 READA POKEI, A NEXT 

1050 DATA 0,85,0,1,85,64 

1051 DATA 5,85,80,5,85,80 

1052 DATA 21,85,84,21,85,84 
1033 DATA 85,85,85,85,85,85 

1054 DATA 85,85,85,85,83.85 

1055 DATA 21,85,84,21.85,84 

1056 DATA 37,85,88,33,85,72 

1057 DATA 32,20.8,8,0.32 

1058 DATA 2,0,128,0,255,0 

1059 DATA 0,255,0,0,255,0,0,255,0 

1060 FORI=704TO742:POKE1,0 NEXT 

1070 FORI = 743T0766 : READA POKEI,A NEXT 

1080 DATA 0,60,0,0,126,0,0,255,0,0,255,0,0,255,0,0,255,0,0,126,0,0,60,0 
1090 RETURN 

1900 PRlNT" .l B ro WK9Wanw««“,TAB(18),“ai 99 " 

1910 F0RI=1T05 PRINTTAB(20>"!T» " NEXT 
2000 PRINT" U I* trw 

2010 PRINT” 4a W 

2020 PRINT" *3 - W 

2030 PRINT" 43 gr 

2048 PRINT":» 

2050 POKE2023,160■P0KE56293,14 
2060 RETURN 

3000 FORI=0TO3 READXCI),V<I> NEXT DATA2,0,2,2,0,2,255,2 
3010 FORI=0TO3 READSXCI> , SV< I ) '• NEXT 
3020 DATA 184,196,188,184,204,184,216,184 
3030 RETURN 
4000 PRINT”seW«*li 
4010 PRINT" 

4020 PRINT" 

4030 PRINT" 

4048 PRINT" 

4050 RETURN 

READY. 


M**W**W*^**&**'M**'i!*'M 
SK '.Ws* yisW s# m 's* 'sMS* 

■ja I . TT*. ' i A , |a I »A I ■ .A ■ t ^»a r t ^ ■ T |A 

(9 STbiSw b™ STaW «TilW BlJtiW 5T.W 
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Spel till ZX-Spectrum 

Av Fredrik Lejonklou 


Fredrik Lejonklou som snart är 16 år 
har fastnat för det här med datorer. 
Efter en första introduktion i skolan 
började han arbeta med en ZX-81:a. 
Nu när Spectrumen kom satsades 
naturligtvis alla sparpengarna på en 
sådan. Han har redan hunnit att 
konstruera flera trevliga spelprogram 
till denna och här kommer alltså 
spelet "Oxygene Panic"! 

Spelet handlar om att med en "Pac- 
Man”-liknande figur ta sig runt en 
bana och äta upp alla prickar, innan 
syret tar slut. De frukter och nycklar 
som finns är ej nödvändiga att äta för 
att ta sig till nästa karta, men ger 


bonuspoäng (100/styck). 

Tänk på att bonuspoängen man 
lyckats få ihop endast gäller om man 
har klarat kartan utan att dö. Dessa 
frukter och nycklar har också en 
benägenhet att växla till "döskallar" 
varje gång syret passerar ett jämnt 
10-tal. Döskallarna är farliga och 
innebär döden om man springer på en 
sådan. 

Efter varje karta, det finns 4 olika, 
ökar hastigheten hos syrets 
minskning, det tickar alltså snabbare 
och snabbare neråt. Man har tre 
chanser och när de tre gubbarna är 
slut så är också spelet slut. Poäng 
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När syret 



över 5000 får betraktas som bra. 

Nu över till själva programmeringen. 
Programmet sparas i 2 delar. 

Först slår man in program 1 (Basic) 
och sparar detta band med SAVE 
"OXYGENE" LINE 1 
Sedan slår man in program 2 som 
innehåller de definierbara tecknen. 
Detta sparar man efter program 1 med 
SAVE "OXYGENE" CODE USR 
"A",96. 

När program 1 laddas, laddas 
automatiskt program 2 också in. Man 
behöver således inte använda sig av 
mer än LOAD 

Här är en program förklaring till 
program 1. 

Rad 10 laddar de definierbara 
tecknen 

Rad 20-90 instruktioner 
Rad 120-130 variablernas sätts ut 
Rad 190-299 ritar ut ramen kring 
kartan och sätter ut prickar och 
frukter. 

Rad 300-699 ritar ut de fyra olika 
kartorna. 

Rad 1000-1200 huvudloop. 

Rad 2040-2090 svänga vänster 
rutin 

Rad 2140-2190 svänga höger rutin 
Rad 2240-2290 svänga uppåt rutin 
Rad 2340-2390 svänga nedåt rutin 
Rad 3000-3015 död rutin 
Rad 3016-3050 Game over rutin 
Rad 3025-3026 Hi-score rutin 
Rad 4000-4030 äta frukt rutin 
Rad 4300-4320 äta stor prick rutin 
Rad 4600-4620 äta liten prick rutin 
Rad 5000-5200 rutin för bonus när 
man klarat kartan 
Rad 6000 växlar frukter till frukter 
Rad 6500 växlar döskallar till frukter 
Rad 7000 rutin för att veta att man 
dött av att gå på en dödskalle och inte 
av syrebrist. 


X HCn ran » v 

2 REM Fredrik Lejonklou 
10 LORD “‘CODE USR "a" 

13 LET h $ = "JFL* 


20 BORDER 2: PftPER 2. 


1983 


LET hi*3000 


30 PRINT TRB 4,. INK 0, “FREDP.IK 
LEJONKLOU" 

4-0 print ' '"is proud to presen 
t thc new": PRINT "arcade game O 
XVGEN PRNIC !“ 

30 PRINT ' '"You iove Your R tr 
ough the labyrith »ith the 

Fegs : " 


60 PRINT '"U, 5, Z & R. But Re 

ep an eye on the oxugene'" 

70 PRINT ''"Uhen You have eate 
You »ill be moved 
labyrinth (»orse!! 


n everything, 
to another 


INK 7;"Press ang 

PRPER 0 INK 0: B 
LET g - • 1: LET Z«60 
DIM C(3 


"K" 

FFFFFF 


) 

80 PRINT '' 

Reg to begin! 

90 PRUSE 0 
HO BORDER 0 
RIGHT 0: CLS 

120 LET p*0 

00 

130 LET k si: LET »en*3: 

) 

190 IF R«1 THEN GO TO 300 

191 IF R *2 THEN GO TO 4-00 

192 IF R *3 THEN GO TO 500 

193 IF 1=4 TMEN GO TO 600 
194. LET k al: GO TO 300 

200 LET g «y +.1: LET a-1 LET b* 
1: LET 0=99: LET po=0 

201 LET q«0: LET az-INT (RND #3 1 
IF az =0 TMEN LET al-"!" 

202 IF az«l THEN LET a T 

203 IF az-2 THEN LET a i 
203 PRINT RT 0,0. INK 7. i 

FFFFFFFFFFFFFFFFFFFFFFFFFF 
210 FOR n-1 TO 21: PRINT RT n,0 
; INK 7;"F";RT n,31;"F": NEXT n 
220 PRINT RT 21,1; INK 7;"FFFFF 
F FFFFFFFFFFFFFFFFFFFFFFFF^ 

230 PRINT RT 0,16; INK 7;" ";h* 
hi;" ";RT 21,16;" Oxggcne." 
;o ";RT 21,2;" Men : "; »en ; " " 

232 PRINT RT e,f; INK 6;a$;RT g 
,h,a$;RT l,J;af 

235 FOR n-1 TÖ 10 

24.0 LET a2 =RND*20+1: LET b2«RND 
*30-+ 1 . IF RTTR (a2 , b2) < >0 THEN G 
O TO 24.0 

24.5 PRINT RT a2,b2; INK 5; "G" 
250 LET a 3 »RND#204-1: LET b3=RND 
#30+1: IF RTTR (a3,b3)<>0 THEN O 
O TO 250 

233 PRINT RT a3,b3; INK 3; "H": 
NEXT n 

270 IF RTTR (a,b)<>0 THEN GO SU 
B 4-300 

260 GO TO 1000 

300 LET e-12: LET f-2: LET g=S 
LET h =24: LET i «19 LET J-12. C 
LS 

310 PRINT RT 4,1; INK 7;"FFFFFF 
FFFFFF"; RT 4-, 15; "FFFFFFFFFFF" ; RT 
© ,6, "FFFFFFFFFFFFF"; RT 6,24; r ‘FF 
FFFFF"; RT 14,3; "FFFFFFFFFr RT 1 
4,13; "FFFFFFFFFFF";RT 16,1^_*FFFF 
FFF";RT 16,10,"FFFFFFFFF";RT 16, 
26;"FFFFF" 

320 PRINT RT 10,1; INK 7;"FFFFF 
FFFFFF";RT 12,20;"FFFFFFFFFFF" 
330 GO TO 200 

400 LET e-6. LET f-8 : LET 0*10. 
LET h*10: LET i-15 LET j*20. C 

LS 

410 FOR n-1 TO 10 PRINT RT n,2 
, INK 7;"F";RT n,8; "F";RT n,12;" 
F " ; RT n , 20; **F"; RT n,26;"F": NEXT 
n 

4-20 FOR n-6 TO 15 PRINT RT n,5 
; INK 7; "F";RT n,16;"F": NEXT n 
430 FOR n =6 TO 12. PRINT RT n,2 
3; INK 7;"F";RT n,29;"F": NEXT n 
440 FOR n■14 TO 20: PRINT RT n, 
9, INK 7;"F";RT n,l9;"F";RT n,26 
;"F": NEXT n 

450 PRINT RT 4,20;" "; RT 1,26;*' 
^RT 18,26;" "; RT 19,9;" "; RT 5 

460 GO TO 200 

500 LET e *12: _ 

6. LET h-2: LET i-19: LET 
CLS 

506 FOR n-1 TO 6: PRINT RT n,4; 
INK 7;"F";RT n,l5;"F";RT n,23;" 
F": NEXT n 

310 FOR n *9 TO 14. PRINT RT n,6 
; INK 7;"F";RT n,14;"F";RT n,19; 
f, F" ; RT n , 28; "F" : NEXT n 
313 FOR n-16 TO 20 PRINT RT n, 
2; INK 7;"F";RT n,9;"F";RT n,16; 
"F";RT n,25^_F": NEXT n 
520 PRINT RT 3,8; INK 7;"FFFFFF 
F";RT 3,16;"FFFFFFFFFF";RT 8,3;" 
FFFFFFFF";RT 8,13;"FFFFF";RT 8,2 
2;"FFFFF";RT 12,1;"FFF",RT 12,9; 
"FFFFFFF";RT 12,25;"FFFFFF";RT 1 
8,2; "FFFF ‘ ;RT 18,9; “FFFFF";RT 18 
, 17; "FFFFFF"; RT 18,26, "FFF f * 

330 GO TO 200 

600 LET e =3 LET f =5: LET g-8 : 
LET h —15: LET i»16: LET J-14: CL 

610 GO TO 200 

100O PRINT RT 0,2; INK 7;" ";p;" 

1005 PRINT RT 21,25; INK 7;INT O 
; " "; RT a, b; INK 6; f, R" 

1010 IF INT O/10 *INT (O/10) THEN 
GO TO Z 

1020 LET o-O-g. IF 0<1 THEN GO T 
O 3000 

1030 IF INKEY f-"4" THEN GO TO 20 
00 

1040 IF INKEY8-"*" THEN GO TO 21 
00 

1080 IF INKEY*-"»" THEN GO TO 22 
00 

1060 IF INKEY0—"Z" THEN OO TO 23 
00 / 

1200 GO TO 1005 
2040 IF 
O 100© 

2050 IF 
UB 4000 

2051 IF 
UB 4300 
2032 IF 
UB 4600 
2053 IF 
O 7000 
2060 LET 
K 6;"B"; 


LET f-22: LET g-1 
J -29: 


O 1000 

2150 IF 
UB 4000 

2151 IF 
UB 4300 
2132 IF 
UB 4600 


RTTR 

H 

1 

& 

j* 

= 7 

THEN 

GO 

T 

RTTR 

(a > b -1) 

-6 

THEN 

GO 

5 

RTTR 

(a > b-1) 

-3 

THEN 

GO 

S 

RTTR 

(a , b-1) 

-5 

THEN 

GO 

3 

RTTR 

(a , b-1) 

-2 

THEN 

GO 

T 

b — b 

-1: PRINT l 

RT a , 

b; 

IN 

INK 0;" " 

TO 1000 





RTTR 

(a / b 4 1 ) 

-7 

THEN 

GO 

T 

RTTR 

(a , b4- 1 ) 

— 6 

THEN 

GO 

S 

RTTR 

(a > b♦ l) 

-3 

THEN 

GO 

5 

RTTR 

(a , b + l) 

-5 

THEN 

GO 

S 


2153^IF RTTR (a,b-+l)»2 THEN GO T 

2160 PRINT RT a,b;" INK 6; "D" 

LET b = b ■+1 
2170 GO TO 1000 

2240 IF RTTR (a-l,b)-7 THEN GO T 
O 1000 

2250 IF RTTR <a-l,b>»6 THEN GO 3 
UB 4000 

2251 ir OTTR (4-1,b),3 TMEN OO S 
UB 4300 

2252 IF RTTR (a-l,b)»5 THEN GO 6 
UB 4600 

2253 IF RTTR (a-l,b)«2 THEN GO T 
O 7000 

2260 PRINT RT a,b;" ": LET a=a-l 
PRINT RT a,b; INK 6;"C" 

2270 GO TO 1000 

2340 IF RTTR <a+l,b>-7 THEN GO T 
O 1000 

£350 IF RTTR (a 4-1, b) -6 THEN GO S 
UB 4000 

2351 IF RTTR (a*1,b)-3 THEN GO 5 
UB 4300 

2352 IF RTTR (a*l,b)=5 THEN GO 5 
UB 4600 

2353 IF RTTR (a+l,b)-2 THEN GO T 
O 7000 

2360 PRINT RT a , b; " ": LET a -a 4-1 
: PRINT RT a,b; INK 6;"E" 

2370 GO TO 1000 
3000 LET C (»en)-1 
3002 PRINT RT 21,25;0 
3006 PRINT RT a,b; INK 3; FLRSH 
1; BRIGHT 1;"R": FOR n-1 TO 200 
NEXT n 

3010 RESTORE 3500: FOR n-1 TO 7 
RERD a b,b b BEEP ab.bb: NEXT n 

3015 LET »en a»en -1 •. PRINT RT 21, 

7; INK 7;»en;" IF »en>0 THEN 

LET 0-99: LET Q-0: GO TO 1000 

3016 LET x$*" Run out of oxugene 
•.." LET z|-" You »ent on ranto 
»en . . . " 

3017 CLS : IF C C3> -0 THEN PRINT 
RT 4,2; INK 6;"l.";z*: GO TO 301 
9 

3018 PRINT RT 4,2; INK 6;"l.";x* 

3019 IF C(2)»0 THEN PRINT RT 7,2 
, INK 5;"2.";Z*: GO TO 3021 

3020 PRINT RT 7,2: INK 5;"2.";x* 

3021 IF C(l)-0 THfeN PRINT RT 10, 
2; INK 4;”3.";z$: GO TO 3023 

3022 PRINT RT 10,2; INK 4,"3.",X 

3024 PRINT RT 14,6; INK 3;"G R M 
E O U E R" 

3025 IF p >-hi THEN LET hi-p : INP 
UT "You're best! Initials?? (3)" 

30*6 IF LEN hk>3 THEN GO TO 3025 
3030 PRINT RT 21,0, INK 6;"One » 


OR INKEY$»"Y* 


o re t i »e? (u /n) • 

3040 IF INKEY $ — * 

THEN GO TO 20 
3050 GO TO 3030 

3500 DRTR .5,0,.5,0,.25,-2,.25,- 

3,1,—7,1,—12,1,—19 

4000 LET q-q+1 

4010 PRINT RT a,b; INK 4, q 

4020 FOR n-0 TO 20 STEP 2: BEEP 

.05,n: NEXT n 

RT a,b;" ": RETURN 
4300 LET p*p+50: LET po-po+1: BE 
EP .05,12 

4310 IF po»20 THEN GO TO 5000 
4320 RETURN 

4600 LET p-p+25: LET po*po+l: BE 
EP .05,24 

4610 IF PO-20 THEN GO TO 5000 
4620 RETURN 

oiöiöw KH1NT RT 0,3; INK 7;p;RT a- 
1,b-1; INK 3; FLRSH 1; OUER 1;" 
;;;RT a,b-i;" ";rt a#l,b-l; " 

5100 RESTORE 5200: FOR n-1 TO 7 
^??2 D ^. aa ' ba : BEEP aa , ba : NEXT n 
5110 CLS : PRINT RT 0,6; INK 7,* F 
/'RT 6,5; INK 4; "Oxggcne bonus : 

; INK 6; INT o; INK 4; •• * 10 "; LET 

P-P4-INT 0 * 10 : FOR n »1 TO 250: M 
EXT fl 

5112 PRINT RT 0,6; INK 7;p;RT 10 

5115 FOR n-1 TO Q: FOR »=1 TO 2. 
NEXT ffi: BEEP .05,15: BEEP .05,1 

6. BEEP .05,15: PRINT INK 3;a$;‘ 

: NEXT n 

5116 PRINT INK 6;"- ";q*100: LET 
p»p+g*100. PRINT RT 0,6; INK 7; 

P FOR n-1 TO 100: NEXT n 

5120 PRINT RT 17,2; INK 6;"PrePå 

re for next labyrinth!" 

5130 FOR n-1 TO 150: NEXT n 
5140 LET K — fc 4-1: BEEP .1,36: GO T 
O 190 

5200 DRTR 1,0,.25,2,.5,3,.5,0,2, 
7,.5,-12,.5,-12 

6000 LET Z —6500: PRINT RT C , f ,* X 
NK 2; "L" ; RT g,h;"L";RT i , J; "L .* 
LET O-O-l: GO TO 1000 
6500 LET Z —6000: PRINT RT « , fI 
NK 6;a »;RT g,h;ag;RT i,j;a|: LET 
O-O-l: GO TO 1000 
7000 LET C(»en)-0: GO TO 3005 


10 FOR »-1 TO 12. RERD at 
20 FOR n-0 TO 7: RERD a 
30 POKE USR a$+n,a: NEXT n 
40 NEXT » 

50 DRTR "a",24,126,126,255,265 
/24,"b",24.126,206,7,7,2 
06, 126,24, "C" ,36,102,66.195,231, 
iaé ' liB ' ai *' aa 

.25 T 2."•”' a *i 126 >186,831.195 
,66,108,36 , " f •• , 186, 189,129,1^9 - 1 
89,189,189,186,"9",0,0,0,84,84,0 
, 0/g / "h " , 0 , 0,84., 36,36,24,0,0 

8,8,6,14,20,56,8 
24,"J",86,34,28,0,6,84,8,56,"1”, 
4,8,60,126,126,186,60,0, Ä l",60,1 
26,810,288,118,68,48,48 
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Daniel Hazard, 16 år ar¬ 
betar aktivt med olika 
datorer och har hållit på 
drygt ett år. I "Finn-upp "- 
tävlingen som anordnas 
av bl a Sv. Uppfinnarfö- 
reningen gick grupp-pris¬ 
et i år till Torslanda-sko- 
lan där Daniel går. 
Daniel har konstruerat ett 
program där man med 
hjälp av joy-sticken kan 
programmera en dator. 
Detta är framtaget som 
en hjälp för handikap¬ 
pade. 


A 



• • • Masken är ett spel för 
den oexpanderande Vicen, skri¬ 
ven helt i Basic. Det är egent¬ 
ligen ett ABC 80 program som 
konverterats till Vic-20. 

Det gäller att med maskens hu¬ 
vud köra på så många flaggor 
som möjligt. När man styr mas¬ 
ken skall man tänka sig att man 
sitter på maskens rygg. Trycker 
man på "A" så svänger masken 


åt vänster och på "=" åt höger. 
Ett bra resultat i detta spel får 
man om man har tungan rätt i 
munnen och tänker rätt. Vi på 
redaktionen har lyckats komma 
upp i 83 poäng och det får väl 
betecknas som rätt bra. 

Här är en liten programförklar- 
inq. 

RAD: 

83-86 Datasatser för musiken. 



140-170 Ritar ut masken och 
väntar på att spelaren trycker 
på någon tangent. 

270-320 Sköter om maskens 
styrning. 

330 kollar om målet träffats. 
340-350 kollar om masken kroc- 
kat med sig själv eller med kan¬ 
terna. 

360-430 Riter ut masken när den 
flyttas. 

450-515 Ritar ut nytt mål och 
räknar upp poängen. 

590-650 Bestämmer vilken kom¬ 
mentar spelaren får. 

AV DANIEL HAZARD 
ILLUSTRATIONER: KARIN 
SVENSSON 



7,7, 8,6.7, 5,4,4,5,5,6,4,5 
1,5.5,6,4,2,2,6, 6,7 


i REPPiiftSKEN hv iiniiiiaa siaofsaii * 2 - 01 - 0 ? 

5 T5*="DRTORN"T51i=10 

10 Sl*368?4 S2=S1+1 S3«S2+ES4=S3+1■V=S4+1 
12 DUH112<2.01.ri2i:i260I 

14 PRINT-rr, PRINT-I6TVR NOTSOLS NED rt" PRINT"ULH MEDS0LS MED «" 
18 POKEV+1,29 
20 REST0RE 

22 PRINT " •MIBWKLRR '" , 

23 GETR* IFR*="“THEN23 

26 PRINT":*_“ 

30 PRINT"*".TRB<111T5»,"11“,T 52, 

?0 T3Z=0PX»0 R2=0 
80 F0RN=1T08 = RERDPOO : NEXT 

83 DRTFt223,227,230,231,234,236,238,239 

84 DRTR6,4,5,5,6,4,5,5, 3, 4,4.6,4,6,4,5 

85 DRTR2. 2, 2,8,2,8, 2 . 7 , 7 . 7,3,5, 5, 3, 4,5,6,6,1 

86 BRTR3.3, 7, ?,8,6, -1 

148 pr i nt " damanuaanw r bb < 5 i -••••o" 

150 F0RI = 1T05 m2<l+50?«ll H22<56-li=4+l NEXT 
160 BX=51 EX=55FX=0 
170 F0RD=0TO1000 NEXT:T2Z=-1 i GOSUB450 
130 T3Z*1+T3Z 
200 RERDNX IFNX310THEN200 
205 IFN2=-1THEN2000 
210 P0KES2,P<NXi 

270 GETR*:1FR*="R"0RR*="«"TH£N272 

271 R2=0 GOTG230 

272 IFR*="R"TH£Nh2*193RND127 

273 IFR*="="THENRX=189RNI>127 
290 FZ=<FX+<RZ=611-(RX=6571RNI'3 
300 HlX<BZ-l>=niX<BXI+<FX'll-<F2=3? 

310 M2X< BX-1 ? =M2X< Bli 1+< FX*2> -1FX=0 > 

320 UX»M1X<BX-Ii ZX=M2X<BX-li 
330 I FklX=VXRNDZX=XXTHENGOSUB450 ■ G0T0338 
340 1FPEEK T ?680+22*WX+ZX 1O32THEN530 
350 IFWZ<0ORWX>22ORZJi<0ORZ!O21THENS30 
368 POKE7680+M 1X i BX 1»22+H22(B?.),81 
361 POKE38400+M1X<BXT*22+I122<BX1, !NT<RND<11*61+2 
365 POKES2/0 

370 P0KE7688+M1 X< BX-1l*22+t12X<BX-1) , 87 


410 lFBX=0THENMlX<2601=mX<01 M22<2607=MZX(01 BX=Z60 

430 GOTO190 

450 RX=0 : T2X-T2X+1 

455 POKEV,15 : POKES3* 200 

456 POKES1,130 

460 POKE?680+22*VX+X2,32 
462 POKES1,200:POKES3.240 
470 YX=1NT<RNDC11*201+I X2=INT<RND<11*201+1 
475 POKES3,250 

480 IFPEEKi ?680+22*VX+XX>O32THEN4?0 
485 POKE7680+22*VX+XX,102 
490 POK£38400+22*VX+X2,0 
510 POKES3,0 POKES1,0 POKEV,4 
515 PRINT"**tlU_HBR"T2XRETURN 
3 538 P0KES4,140 POKEV,8POKES2.0 
5 540 FORD»0TO20@0 NEXT 
542 P0KES4,0•POKEV,0 
555 FORD=1TO1000 NEXT 
578 POKEV+1,141 POKE198.0 
590 B*»“URKRSST" 

600 1FT2X31THENB*=“GRNSKR KRSST” 

610 IFT2X>5THENB*="DU TRR B1G... “ 

620 IFT22210THENB*="MVCKET BRR" 

630 IFT2X>25THENB*="UT0M0RDENTLIGTI* 

640 IFT2X>50THENB*= " SUPERBRR " 

650 1 FT2>i> 100THENB*= "HVPERFENOMENRLT" 

688 PRI NT" OS DU FICKi "T2X”»LRGG0R'‘ PR1NT“JWW8"B* 

700 1FT2X3T5XTHEN781 
710 GOTO910 

781 PR1NT“««U0 HRR Hl-SCORE " PRINT“DITT NRMN, TRCK <7TKN1“ 
785 IFLEN(T5*T>?THEN781 
790 T5X=T2X 

910 PRINT'5WS VILL DU SPELR IGEN" 

930 INPUTR* IF LEFT*(R»,11="N"THENEND 
940 PRINT"O" GOTO18 
2000 REST0RE 
2010 GOT0200 


INPU 


RERPV. 
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Televerkets 
godkännande 
cert ifikat 
Rf. 1304/83 


16K RAM ELLER 48K RAM ^ i^Ä.fii.LliiJ 

LJUDGENERATOR OCH INBYGGD HÖGTALARE # / 

ANSLUTS TILL EN VANLIG FARG-TV ~ j* f /* j f\L ' 
MÄNGDER AV TILLBEHÖR OCH PROGRAM J I ^ 

KRAFTFULL 16K BASIC SPECTRUM 16K 1895:- 

SPECTRUM 48K 2395:- 
EXTRA 32K 485:- 


22 RADER MED 32 TECKEN PER RAD 



V ii JJ\f .Sii 

/ / DIREKT TILL SPECTRUM OCH ZX 81 
32 TECKEN PER RAD 
50 TECKEN PER SEKUND 
HÖGUPPLÖSANDE GRAFIK 
LÄTT ATT BYTA PAPPERSRULLE 


Pris ZX-printer. 749 krutan natadapter 

3 extra rullar papper.... 9950. 


ÄAATJi) 
3lSU(431/a J 
ViiUiiii^J 

BESTÄLL GRATIS 
KATALOG 48 SIDIG 
SOFTWARE KATALOG 
MED ÖVER 300 
PROGRAM. 




Josty kit katalog 1983/84 
finns nu på lager — Allt för 
dig som är intresserad av 
elektronik och hemdatorer. 

350 sidor. Pris 15kr. 

mil JOSTY KIT AB Box 3134 200 22 Malmö 3^ 

□ JOSTY KIT katalog 1983/84. 350 sidor. Kr.15:00 plus porto. 

□ st. av.mot postförskott a' pris Kr. 

□ st. av.mot postförskott a" pris Kr. 

Namn. 

Utdelningsadress. 

Postnummer och ort.■ ■ 

Föredrar Du att ringa till oss, finns vi på 040/126708, 126718. 
Du ar alltid välkommen till våra butiker på ö Förstadsgatan 8 i 
MALMÖ eller i GÖTEBORG på ö. Husargt 12. öppet 10 - 18. 
V^Lördagsöppet 10 - 13. Moms 23,46% ingår. Porto tillkommer. 
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Mc» 

datorkraft 

för 

pengarna 


ISA 


Du kanske också tillhör de som upptäckt att din billiga dator inte klarar av 
att göra det du vill. Minnet är för litet och om det överhuvudtaget går att 
bygga ut blir den ”billiga” datorn plötsligt dyr. Om du sedan måste betala 
extra för svenska tecken och andra självklarheter är det lätt att datorn 
hamnar längst in i garderoben och samlar damm så snart spelprogram¬ 
men känns utslitna och tråkiga. Och det kan ske snabbare än du tror. Att 
köpa en dator med för litet minne är lika listigt som att köpa för små byxor 
bara för att de är billiga. 

När du köper MPF II får du över¬ 
lägsna 64K RAM direkt från starten. Du får 
också svenska tecken och ordentliga hand¬ 
böcker. Och det till ett pris som borde få våra 
konkurrenter att blekna. Dessutom är det bil¬ 
ligt att bygga vidare på din MPF II. Många 
andra datorer kräver t ex speciella 
bandspelare, - till MPF II kan du 
använda din vanliga kassettbandspe¬ 
lare. Om du nu inte skaffar MPFs floppy- 
diskdrive som är bland marknadens 
billigaste och mest kompakta. Naturligt¬ 
vis finns också alla andra tillbehör du kan 
önska dig. 

Vill du veta mer om MPF II och var du kan 
se på den, kan du ringa till oss pä Centrum 
Computer eller till din närmaste datorförsäljare. 




I 


Micro 


Professor il fran QmuTITEGH 



CENTRUM COMPUTER 

16185 Bromma Telefon 08-987590 







Ett program på två olika datorer? 


En dator kan inte göra 
någonting själv utan måste 
programmeras till att göra 
saker När man skall program¬ 
mera finns det olika språk, det 
vanligast språket är Basic. 
Detta språk är det som an- 
vands i "Allt om Hemdatorers” 
program 

Basicen är byggt i de flesta 
hemdatorer och det är bara att 
börja slå in programmet. På 
vissa datorer måste en särskild 
Basic-tillsats vara inpluggad. 
Försäkra dig om att denna 
sitter i innan du börjar slå in ett 
program 

BASICPROGRAM 

I varje nummer av "Allt om 
Hemdatorer" finns spel till 
många olika datorer. Det är då 
viktigt att tänka på vilken dator 
programmet är avsett för Att 
slå in ett VIC-20 program på 


en Texas dator går alltså inte. 
Den duktigaste programmera¬ 
ren kan kanske göra om pro¬ 
grammet så att det passar just 
hans maskin. Att inte alla pro¬ 
gram passar till alla datorer 
beror på att programmen ut¬ 
nyttjar datorns speciella möj¬ 
ligheter. Det gäller också att 
slå in ett program precis som 
det står i listningen. Datorn 
kan inte rätta dina stavfel så 
knappa försiktigt och noggrant. 

Tänk på att inte förväxla 1 
och 1,8 och B och O och o. 
Detta är de mest vanliga fel 
som man gör vid inknappnmg 
av program. 

DATASATSER 

Datasatser innehåller upp¬ 
gifter om ljud, grafik eller 
maskinkod. Om datasatserna 
innehåller maskinkod är det 
speciellt viktigt att kolla raden 


flera gånger så att det stämmer. 
Om den inte gör det kommer 
datorn att "dyka" när man kör 
programmet och det är bara 
att stänga av och sätta på 
igen. 

Det är därför viktigt att spara 
programmet. 

Slå in raderna precis som 
de står och glöm inte några 
mellanslag eller liknande. När 
hela raden är inslagen tryck 
"Return" eller "Enter". 

Kolla raderna mot tidningens 
rader. 

Spara programmet när det 
är färdiginslaget. När man 
knappar in längre program kan 
det vara bra att göra back-up 
kopier var 20 minut. Se till att 
specialsymboler är rätt inslag¬ 
na. 

VIC-20 har många olika 
symboler vilka du kan se här 
brevid. 


■ 

SVART (CTRL- 

-1) 

d 

VIT 

CCTRL- 

-2) 

fl 

RÖD 

(CTRL- 

-3) 

k 

CYftN 

(CTRL- 

-4) 

1 

LILA 

(CTRL- 

-5) 

ii 

GRÖN 

(CTRL- 

-6) 

S 

BLA 

(CTRL- 

-7) 

,1 

GUL 

(CTRL- 

-8) 

fl 

Fl 



fl 

F2 



fl 

F3 



K! 

F4 



II 

F5 



fl 

F6 



II 

F7 



fl 

F8 



sl 

RVS ON 


■ 

RVS OFF 


a 

HOME 



3 

CLR 



% 

CRSR 

BONN. 


n 

CRSR 

UP 


y 

CRSR 

RIGHT 


ii 

CRSR 

LEFT 



Stor text en 
listning till VIC-20 


Av Daniel Hazard 


i 8 t- GF.fi— 0705 i i 

23 F0KE7 i 6o+fi*2- i 28*8 .• FEEK ( 32768+Fi > 

30 FOKt.7 i 63+fi*£-i £3*8+ i .• PEEK ( 32763+fl) 
49 NEG7 

53 F0Rfi~07023 : REfiliJ 
63 PUKE7 i 68+27* i 6+fl*2— 128*8 .• J 
85 F0KE7 'i 38+27* i 6+fi*2- i. 28*8+ i .< J 
70 NEG7 

33 ii Fl 1 Fi240 .• 63 .■ 66 > i 26 .■ 66 .■ t86 .■ 0 
85 D87 fi 102 .■ 0 .• 68.' 66 > 66 .■ 66 ■ 60 .• 8 

30 Di-i Tn 132 .> 0 .• 60 > 66 .* i 2666.' 66 > 0 

31 F GRn=0103i : F *JKC = 8707 : P0KE7168+fl*i6+ 

32 F0KE7 i 68+fi* i 6+S+C.. PEEK. ( 327S8+fl*8+C > 
160 FOKE36867 .■ 27’ 

i 3 5 P 0 K E3688 i .■ 3 8 
i IG -0KE36863.• 254 
128 FOKE56■24 

130 PRI NT "EJ ST0P.7EG7" 


Stortext är ett litet program som får tecknen på VIC- 
20 att bli dubbelt så höga. Det fungerar på en 
oexpanderad VIC eller med 3 K ram extra. 

Detta program är kul om man t.ex vill lägga in 
förtexter till sina videofilmer. Här får man ju extra 
stora texter som ser ganska imponerade ut. 

Programmet stjäl 1,5 byte ram av datorn och 
markören ser lite konstig ut men för att få den 
normal igen måste man ta ännu mer minne av 
datorn. Skärmen görs också litet större för att fler 
rader skall få plats 

Om man trycker på t.ex. SHIFT ”B” så 
framträder ett B av normal storlek, här man 
använder ”stor text” för att skriva egna program 
måste man ta hänsyn till att VIC:en fortfarande tror 
att den har 23 rader och att skärmen därför inte 
”scrollar” normalt. 

Programförklaringar: 

Rad 10-40 Läser av hur tecknen skall se ut 
och lägger in dem dubbelt så höga i den nya 
teckengeneratorn. 

Rad 50-70 Lägger in Å Ä Ö i 
teckengeneratorn. 

C.' 8 : NEG7 : FOR C=0707 
: HEG7C .■ fl 

Rad 80-90 Data för utseendet på Å Ä Ö 

Rad 91-92 Lägger in de normalstora tecknen. 

Rad 100-120 Ställer om VIC-chipet för att 
fungera för stor text. 
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Förra numret av tidningen fanns det 
ett program till Spectrum som hette "Se 
upp för Gnurglor och Oljefläckar". Här 
kommer ett nytt spel av samma upp¬ 
hovsman. 

När Gnurglorna har slitit och jobbat 
hela dagen så har det tagit hårt på 
krafterna Det tar för en liten gnurgla att 
springa undan för motorcyklar och 
dessutom sprida ut olja på vägen. 

När klockan slårfem skall de hem. På 
vägen känner de en konstig stank och 
när de når gnurgelhålan gör de en 
fasansfull upptäckt. "Gammelosten har 
slitit sig! Den låg väl fastkedjad men 
måste på något sätt kommit lös. Nu 
springer den fritt i gångarna och sprider 
en vedervärdig stank som Gnurglorna 
dör av till och med. 

Nu är det din uppgift att föra Gnurg¬ 
lorna i säkerhet från skärmens topp till 
boet i botten på skärmen. Du för 
Gnurglan till vänster med "femman" 
och till höger med "åttan". Det finns hål 
i de olika golvplanen. Varje gång en 
Gnurgla når ett hål hoppar den ned 
automatiskt till planet under och när 
den når botten är den i säkerhet. I 
gångarna springer "Gammelosten" fritt. 
Befinner sig Gnurglan på samma vå¬ 
ningsplan eller i närheten så dör 
Gnurglan av en luktchock. Dessutom är 
"Gammelosten" dubbelt så snabb som 
den flinkaste Gnurgla. 

"Gammelostar är inte att leka med, 
Här kommer en liten programförklaring. 
Rad 20-70 Huvudloop. 

Rad 200-270 Gnurglans förflyttning. 
Rad 500-550 Gammelostens förflytt¬ 
ning 

Rad 900-999 Vid förlust. 

Rad 1000 Spara spelet på band. 

Rad 2000-2080 Tillverkning på grafik. 
Rad 2100-2190 Tillverkning av sträng¬ 
arna Aft(1)-Aft(10)=golven. 

4 olika grafiska tecken har använts 
nämligen. 

A= mursten B=Gnurgla C=Gammelost 
D=Kors 

Lite programmeringsknep i programet. 
Rad 4 Aktiverar CAPS LOCK 
Rad 200 INKEY &="8” är en booleansk 
variabel. Den är lika med 0 om den är 
falsk, 1 om den är sann. Rad 200 
fungerar alltså så här. Lägg till 1 till x om 
INKEY$="8", Lägg till 0 annars. Om 
INKEYÖ”5" dra ifrån 1. 


Rad 1000 Om du skriver goto 1000 
när spelet är avbrutet får du auto¬ 
matiskt en kopia på bandet. 

Rad 2000 I stället för att ange 
bokstaven. 

Rad 2080 Här anger jag dess code i 
CHRft. Dettagårsnabbareochsparar 
plats. 

VARIABELLISTA 

Z, U = Gammelostens position 
X, Y Gnurglans Position 
P = Antal räddade gnurglor. 

Aft — Golven som sträng 
X(l) = Golvets position 
1(1) = Golvets rörelseriktning. 

På en del ställen står det REM GRAFIK. 
Här skall det matas in de grafiska ABC 
D, alltså inte bokstäver. Se grafiklistan. 
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Till Spectrum 


3 CLS : PRINT INUERSE 1;RT 1C 

,0;" NU 5KRLL UI BRRR INITSIER 

R DET TRR LITE TID 

• • 

4- POKE 23658,0 

5 DIM R$(10,25): DIM 1(10): D 
IM XC10) 

10 GO SUB 2000: GO SUB 2100 

11 BEEP .5,5 

15 BORDER 0: PRPER 0: INK 7: C 

LS 

17 FOR M = 1 TO 10: PRINT RT M*2 
, X(M);R*(M,1 TO 25): NEXT M 
20 FOR M = 1 TO 10 

30 PRINT RT M*2,X(M) ;R* (M,1 TO 
25) 

4.0 LET X (M) =X (M) +1 (M) 

50 IF X(M) >6 OR X(M)<1 THEN LE 
T I (M) = -I (M) 

60 GO SUB 500 

61 GO SUB 500 
63 GO SUB 200 
65 NEXT M 

70 GO TO 20 


Av Clas Kristiansson 
Illustration Kjell Lindgren 


PRINT RT X,Y;'* " 

LET Y=Y +( INKEY* = "S")-(INKEY 


IF 
IF 
IF 
X = 
BEEP 
IF 


Y >29 THEN LET Y=29 

Y <2 THEN LET Y=2 

SCREEN* ( X + 1 , Y ) = " ” THEN 

X+2: FOR K =4-0 TO 60 STEP 
.001,K: NEXT K 
INKEY $<>'"■ THEN BEEP .00 


250 PRINT INK 5;RT X,Y;"B' 


REM 


255 IF X > 20 THEN LET X = l: LET P 
sP+1: FOR 1=1 TO 10: BEEP .01,1* 
6: NEXT I: PRINT ttl;RT 0,0; P 
260 IF X =U RND RBS (Z-Y) <10 THE 
N GO TO 900 
270 RETURN 

500 PRINT RT U,Z;" " 

510 LET Z=Z + 1 

520 IF Z >31 THEN LET Z=0: LET U 
=INT (RND*10)*2+1 
54-0 PRINT RT U,Z; INK 4-J "C". RE 


550 RETURN 

900 PRINT RT X,Y;”D": REM 

910 BEEP 1,12: BEEP 1,8: BEEP 1 
,7: BEEP 2,5 

911 BEEP .1,29 

920 PRINT «1;RT 0,0;P;” PORNG: 
EN GRNG TILL?" 

930 IF INKEY$ = "N" THEN GO TO 99 
9 

94.0 IF INKEY*="U" THEN GO TO 96 

0 

950 GO TO 930 

960 CLS : GO SUB 2170: GO TO 17 
999 STOP 

1000 SRUE "SPEL" LINE 1: STOP 
2000 FOR i=97 TO 100 
2010 FOR j=0 TO 7 
2030 RERD a 

204.0 POKE USR CHR* i+j,a 

2050 NEXT j 

2060 NEXT i 

2070 DRTfl 0,239,239,239,0,127,12 

7,127 

2071 DRTR 24-, 62,90,255,62,24-, 36, 
231 

2072 DRTR 65,16,0,64-, 20,4-2,84-, 17 
1 

2073 DRTR 24-, 24. , 126,126,24-, 24-, 24- 

, 24. 

2080 RETURN 

2100 FOR 1=1 TO 10 

2110 LET 1(1)=SGN (RND-RND) 

2115 LET X(I)=INT (RND#7) 

2120 FOR U = 1 TO 25 _ 

2130 LET <3$="R" : REH M • f 
214-0 IF RND > . 8 THEN LET Q* = ” ~ 

2150 LET R$(I,U)=0* 

2160 NEXT U 

2165 LET R*(I,1)=" ": LET R*(I,2 

5) =" " 

2169 NEXT I 

£170 LET Z =0: LET U=9 

218© LET X =1: LET Y =15 

2185 LET P =0 

2190 RETURN 
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Till: ZX81 

Av Kåre Brunzell 



Instruktion till Draw and Write 

Flertalet ZX81 ägare har säkert någon form av s.k. 
ritprogram i sin programsamling. Ofta bara "ritprogram för 
nöjets skull" och inte konstruerade för att användas till något 
praktiskt. 

Finessen med dessa program ligger i att den bild eller de 
bilder man ritat kan lagras i ramtop, för att efter det 
ritprogrammen raderats med NEW. kunna hämta tillbaka 
bilderna och föra över dem till ett annat program 

Ofta, speciellt i spelprogram, ska det till en mängd med 
beräkningsrutiner och print-rutiner för att få fram önskat resultat 
pa bildskärmen, för att inte nämna den smått irriterande tid det 
tar innan det hela är klart. 

Däremot, om bilden finns lagrad i en sträng, t.ex A§, 
Räcker det med en enda rad i programmet: Print 
A§ och spelplanen om det nu är en sådan ritas dä upp 
blixtsnabbt. 


Efter att programmet skrivits in ska en kopia göras på 
band med GOTO 2940. Detta ska göras innan programmet körs 
för första gängen, beroende på att programmet är 
självraderande. Dels på kommando från meny, samt efter det 
en bild lagrats i ramtop. När sedan programmet ska laddas från 
band skrivs LOAD "DRAW AND WRITE" eller "LOAD". 
Programmet är självstartande och börjar i FAST. Därefter visas 
menyn. 

Från Menyn väljer man önskad rutin genom att ange 
kodnr. Från menyn sker också den slutliga lagringen till ramtop. 
Efter att en bild eller de bilder man ritat lagrats i ramtop, visas 
intruktioner för överföringen till ett annat program, samt en 
listning av överföringsprogrammet som ska skrivas in i det 
program där bilden ska användas, för att föra över bilden i 
ramtop till en sträng. 

När sedan bilden förts över till en sträng kan 
överföringsprogrammet editeras bort. Varje gång man skriver 
PRINT A§ kommer sedan bilden att ritas upp blixtsnabbt. OBS. 
att kommandot RCJN ej får användas efter det att bilden förts 
till en sträng. Använd GOTO och önskat radnummer. 

När en bild håller på att konstrueras, kan 
kommandoinformation hämtas oavsett i vilken rutin du befinner 
dig. Information ges da för den rutin du befinner dig i. När en 
bild är klar sparas denna från ritprogrammet och ytterliggare en 
bild kan ritas om så önskas. 
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1© REM ** DRRU OND URXTE ♦* 

BY K DRUNZELL JULI 1983 
ar GOTO 9© 

3© LET R-R>l(CODE X *=113 OR X* 
6-1 OND R«R-1) -I 1COGE *» = 112 ° 

X * - " 7 ") ONO R>0) _ _ 

*5 LCT K.KHICOOC Xf-115 OR X» 
,"B"> OND K <311 - ( (CODE X»=ll* OR 
Xl>"3"» OND K»©) 

5© LET SK »R »33 ♦K 4ÄP 
6© RETURN 

70 IF INKEY*<>”" TMEN GOTO 70 
80 RETURN 
90 OEM ROMTOP 
100 POKE 16389,182 
110 POKE 16388,128 

iae cl s 

130 FOST 

14.0 LET 08-0 

15© DIM B(3,2) 

16© LET SP-i 

170 DIM 0*11,1408) 

160 DZM B*(iae,6) 

190 LET X-0 

2P© FOR N■1 TO 198 

ai© LET X«X*1 

220 LET N *N♦ (1 OND N*ll) > (63 OH 
» N-64) 

830 LET B*(X)-"NR."♦STR* X*"m" 
243 LET B*(X,8)-CMR* N 
250 NEXT N 
260 SLOU 
27© PRINT 


sse PBIMT '»• 

BILD" "5• LRGRO BILDHOTERIRLET T 

ROMTOP6 . RUSLUTA",,,, ..w '' 


iOO rainT 1 oV It .4 'Td!t r JNNS . 

U •• AB. ' BILD" ♦• ER OND 08 < > 1» , 

" SPrtRAO"♦i"K" ONO RBOl) , » . OT 

21.0. ■ OMGE KOD C1-01 

i!S ^rc2S« x 3SS* o« »» *.>=>* 

THEH GOT c -*0B 

330 GOTv AND *•;= "1 ;;>♦ 

(73 OND •-'*-"21 ♦ ( 1350 RND X0- J 
)♦ 11370 OND X*- 4") ♦ IS390 OND X* 

S;i’£i ,> Så% n! ?fSeS , ré5*T ar n.4. 

iSi iF ,M i.S31?«s-a&« 

360 PRINT OT 18,0, ■ 

RADER SKO BILDEN Mfa? . * 7 aZ( 

rSJ “‘TévCK^BOBH NEULINE 

5SS TMCN GOTO 370 

221 t° R coöe I2 c^gS*or cooe x. 

IN1 >37 THEU GOTO 370 
. le HexT n 

lie ir T B ?ä u oa n>sa tmen goto 37 

0 

44© CLS 

450 LET T-6* 

470 lET°X8«"»»>»>>>>>>>>»>>><<< 

* 480 < LET' P — I PEEK 16390♦aSö#PEEK 

163971♦(0*33)_ 

49© FOR N-l TO 33 

500 POKE P♦N,CODE X0IN» 

510 NEXT “ 

. fIP*33 

540 FOR N s1 TO 32 
S50 POKC P.N,COOE x*INI 
560 NEXT N 
57© RETURN 
58© LET R-0 
59® LET K-0 
600 LET SK-SP 

62© PRINT***C 1,SP TO SP^(0*32) — 

1 6 30 GOSUB 47© 

640 RETURN 
660 GOSUB 620 
680 PRINT RT R,K,D * 

RT R,K,O*(1,SK» 

67© U ET X *-XNKEY * 

663 IF Xla"" TMEN GOTO 660 
690 IF CODE X * > 32 ONO CODE X|<9 

7 70S e iF G CO?E 8 if>lll PHD CODE Xf< 
^VSTcBPkSHit tmen goto a* 

l 7aa IF CODE X0-218 TMEN GOTO 99 
*730 IF CODE XB-11B TMEN GOTO 6» 


,B0«T,8),OT R,K. 


R , K; '* ’* , RT R , K , R *11, SK» 

1020 LET X * -XNKEY* 

1030 IF X*-"" TMEN GOTO 1010 
1040 XF CODE X*-aia TMEN GOTO 07 

1060 IF CODE X 6 >192 TMEN OOTO 10 

1060 XF X-128 RNO CODE Xf-192 TM 
EN GOTO 1010 

1070 IF CODE X8-117 TMEN GOTO 25 

00 

1060 IF CODE Xf>lll RNO CODE Xf< 
116 TMEN GOTO 1340 

1090 IF COOE X * — 116 TMEN OOTO 12 

1100 XF COOE X * — 110 TMEN OOTO 12 

1110 IF COOE X*-11B TMEN LET X0- 

1120 PRINT RT R,K,CMR 0 (CODE X9 + 

1130 LET R* I 1,SK1 —CMR* (CODE X»4 

1140 IF K-31 TMEN GOTO 1220 
1180 LET K-K>1 

1160 XF K-32 TMEN LET R-R♦1 
1170 XF K-32 TMEN LET K-0 
1180 GOSUB 80 
1100 OOTO 1000 

1200 LET X-X4(128 RNO X-0)-(128 
RND X »126) 

1210 GOTO 1000 

1220 IF R-R-l TMEN GOTO 1010 

1230 GOTO 1150 

1240 IF K-0 TMEN GOTO 1300 

12B0 LET KaK-1 

1260 GOSU8 80 

1270 LET A*(1,SK)-" " 

1280 PRINT RT R,K," " 

1290 GOTO 1000 _ 

1300 IF R-0 TMEN GOTO 1010 

1310 LET K-32 

1320 LET R-R-l 

1330 GOTO 1250 

1340 GOSUB 30 

1350 GOTO 1010 

1360 LET Xa® 

137© PRINT RT «7K,B*(T,8> 

138© LET R* (1,SK» -8*<T,81 

139© IF CODE iNKEY*—223 TMEN OOT 


JB 258© 

141© IF K-31 TMEN OOTO 147© 

142© LET K —K♦1 _ . 

1430 IF K-32 TMEN LET R-Rrl 
144© IF K-32 TMEN LET K-0 
1450 GOSUB 50 

1470 IF T R-R-1 0 TMEN GOTO 860 

1490 LET°xix^*i AND X-0)-(l RND 
X a 1) 

1500 GOSUB 70 

1510 IF X-l TMEN GOTO 1370 

1520 GOTO 660 

1830 CLS 

1540 LET X-0 

1550 FOR N-l TO 128 

1880 LET X-X41 

1570 PRINT Bf(NI,“ “i 

1580 IF X-3 TMEN PRINT ,, 

1590 IF X-3 TMEN LET X■© _ 

1600 IF N-24 OR N-46 OR N-72 OR 
N-96 OR N-120 OR N-126 TMEN GOTO 
1630 

1610 NEXT N 

1620 GOTO 1540 „ 

1630 PRINT RT 18,0,Jpi 
F0R FORTS. UTSKRIFT",! 

F0R TECKENURL", TRB 7; * r 

0R RETUR TILL BILD" 

164© LET X*»INKEV* 

165© IF CUOE X* <29 OR CODE Xf>31 
TMEN GOTO 16*0 

1660 IF X * a *' 2" TMEN GOTO 170© 

168© IF S Xf«"l TMEN GOTO 1610 
169© IF Xfa"3" TMEN OOTO 650 
,7ee ppinT ar BNG 

S TKCKNCTS nurmsr !;.T«g V.- TRrc 

K SEDRN NEULINE" 

171© INPUT X* 

172® IF X * a"" TMEN GOTO 171© 

173© FOR Nal TO LEN X* 

174© ZF CODE Xf(NJ <28 OR CODE X» 
(Ni>37 TMEN GOTO 171© 

1750 NEXT N 

176© LET T-URL X* 

177© XF Ta© OR T>128 TMEN GOTO 1 
710 

178© CLS 

179© OOTO 650 

ISO© LET T aT♦1 

1810 IF TalSO THEN LET Tal 

182© PRINT RT R,K,B*lT,8> 

1830 GOTO 660 
1840 CLS 

1880 XF R6-0 TMEN GOTO 270 


iBI 

RT R , K , A * • 
660 

ODE X|<3 


750 IF CODE X *-223 TMEN GOTO 13 
60 

"»60 IF CODE X * a 116 TMEN GOTO 18 
0© 

770 XF CODE X *-225 TMEN GOTO 21 
30 

78© GOTO 66© 

79© GOSUB 3© 
se© GOTO 660 
810 LET R* (1,SKJ -8*(T 
820 PRINT RT R,K ” 

1,SK> 

830 LET X *■INKEY 9 
84© IF Xf*"" TMEN GOTO 
850 GOSUB 30 
860 IF CODE <('33 RND Cl 
7 TMEN GOTO 610 
670 GOTO 660 
860 GOSUB 70 
890 L8T R *(1.SKla" " 

900 PRINT RT R,K,**",PT R.K,“ " 
910 LET X *-INKEY * 

920 IF X * b"" TMEN GOTO 900 
930 IF CODE X *-119 TMEN OOTO 97 
O 

940 IF CODE X * a117 TMEN GOTO 2* 
50 

950 GOSUB 30 
980 GOTO 890 
970 GOSUB 70 
980 GOTO 660 
990 LET X-0 
1000 GOSUB 7© 

1010 PRINT RT R,K;CMR* (15*X>;AT 





-SMilH- 



186© PRINT RT 19,0, ■ U1LKCN »KM 
RRDERRS7 RNGE NR. ", AT 81,0,"TRY 
CK ”"M"" FOR MENY OM EU RADERA . 
1870 LCT X *■INKEY■ 

1660 IF CODE X * < 29 OR CODE Xf>3© 
RND X* < >"M" TMEN GOTO 187© 

189© CLS 

190© IF X *■"M" TMEN GOTO 27® 

191© LET XaVRL X* 

192© IF B(X,1> < >0 TMEN GOTO 2110 
193© LET SP-SP-(B<X,2I -B (X,1) 4l« 
194© IF RB-1 TMEN GOTO 200© 

198© OOTO 19604(20 RNO X-2) 

196© LET Rf(1»-R*(1,B(2,1» TO 1 
197© GOTO 201© 

196© LET R*(1)aR*(1,B(1,1) TO B( 

1 . 2 ) » 

1990 GOTO 2010 
2000 LET R* (1» a"" 

2010 LET R-B (X,a> -B (X,II *1 
2020 FOR Nal TO 2 
2030 ZF N < X TMEN GOTO 2060 
2040 LET B IN, 1) -B(N ♦ 1 .1) 

2888 LET B(N,ll-B(N,1)-R 
2060 LET B(N,2)-B(N4l,2) 

207© LET BIN,2)-B(N,2>-R 
208© NEXT N 
209© LET RBaRB-1 
2100 OOTO 270 

2110 PRINT RT 11,18,"FINNS EU" 

2120 GOTO 2190 

2130 LET RB-RB41 

2140 LET B IRB, 1» -SP 

2150 LET SP-SP4(R*32» 


2160 LET BlP8,8)-5P-1 

2160 PRINT RT 11,B,"BILDEN FINNS 
NU SPARRD" 

2190 PRINT RT 81,0, >>>> TRYCK N 

EULZNE FOR MENY <<(<" 

2200 INPUT X* 

2210 GOTO 320 
2220 CLS 
8830 LET Xa0 

2240 IF RB-1 TMEN LET X-RB 
22S0 IF X-l TMEN GOTO 2330 
2260 IF RB-© TMEN GOTO 27© 

2270 PRINT RT 19,0,"■ UXLKEN Bil 
D SKR SKRIURS UTT-.RT 21,2,"RNGE 
NR. (1 - 2»" 

2280 LET X*-XNKEY* 

2290 IF CODE X*<29 OR CODE X*>30 
TMEN GOTO 2280 
2300 CLS 

2310 IF RB < URL X* TMEN OOTO 2110 
232© LET X-UAL X* 

233© PRINT R*(1,B(X,1» TO B(X,2» 

) 

2340 LET Xfa">>>> TRYCK NEULINE 
F0R MENY <<<<" 

236© LET P-(PEEK 16396♦266 «PEEK 
163971^789 
236© GOSUB 54© 

2370 IF CODE INKEY*<>118 TMEN GC 
TO 237© 

236© OOTO 32© 

239© PRINT MED DETT R PROGRRM KR 
N BILDER MCDTEXT OCM GRRFISKA TE 
CKEN PITRS F0R RTT NYTTUAS I RM 
ORR PROGRRM.TOTALT KRN 2 BILDER 
RITAS. DESSRKRN UAR F0R SIG MR E 
TT GODTYCK- LIGT ANTRL RADER MCL 
LAN 1 - aa. EN LXNUE UXSAR UAR B 
ILDEN SLUTARSRMT DESS MITTPUNKT. 

"NAR EN BILD AR KLAR SPRRRS 
DENNAMEO SMIFT S FRAN PITRUTINEN 
NAR DET BILDMATERIAL SOM. BK 
R IN-GR I DITT PROGRRM RR KLART. 

LAG-RRS BILDEN/BILDERNA I RRMTO 
P MEDKOD 5 FRRN MUUUDMENYN. " , ’"6P 
TER DET BILDMATERIALET LAGRATSI 
RAMTOP, GES INFORMATION OM 
ERF0RING TILL DITT PROGRRM. 
KOMMANDOINFORMATION KRN RNR 
'RRN ALLA RUTINER, OCM GES 
OEN RUTIN DU BEFINNER DIO ~ 

240© OOTO 234© 

2410 CLS 

242© PRINT TRB 12,"RITRUTIN",,., 

, "SMIFT 2 - TEXTNINGSRUTIN. " , j, r ‘5 
HIFT 3- TECKENURL MED UTSKRIFT." 
,, "SMIFT 4a AUTOMATISK LINUERING 
• /./"SMIFT 9- SNABBUAL TECKEN.'' 

, SMIFT 0- RACER ING SRUTIN. " 
"ÄMI-T Sa SPRRRR BILD.".,,— 
8,6,7,B« FLYTTAR MAAK ©R. 

NOcNT 5,B x 7.8a RITAR." 

3430 GOSUB 262© 

2440 GOTO 650 
2*S© CLS 

2460 PRINT TRB 9, "RADERIHGSRUTIN 
titt "SMIFT ©a TXLLBRKR TILL RJ 
TAuTXN."TANGENT B,6,7,8a RRDE 

2470 GOSUB 2620 
2460 GOSUB 620 
2490 GOTO 900 
2800 CLS 

asi© PRINT TRB 9,"TEXTNINGSRUTIN 
■'..../•SHIfT 2a TILLBAKA TILL RI 
TRUT IN."SMIFT 0a TILL/FRAN 
XNOERSA TECK."SMIFT ©- RADER 
AR URNSTER TECKENNEULINEa O 
RDMELLRNRUM I SPACE ) , " (OBS . 8PAC 

e FAR EU NYTTUAS."SMIF^ 
B, 6,7,6- FLYTTAR MRRK0R . '• . , , , , , 
."RUTINEN FUNGERAR SOM EN SKRIVM 
A-SKIN. UISSA TECKEN KAN NAS MED 
SMIFT." 

2520 GOSUB 262© 

253© CLS 
354© GOSUB 620 
25B0 GOTO 1010 
2660 CLS 

2570 PRINT TAB 6,'AUTOMATISK LIN 
UERXNO"....."SMIFT 4- TILLBAKA T 
ILL RITRUTIN."DENNA RUTIN K 
RN NYTTUAS T.EX. OM MAN UXLL H 
R SAMMA TECKEN ©UERMELA BILOEN.' 
,,,,"NRR BILDENS SISTA RAD RR FU 
i_L SKER AUTOMATISKT MOPP TILL8 
RKR TILL RITRUTINEN. 

- GOSUB 2620 

CLS 

GOSUB 620 
RETURN 

-INT RT 21,0, •*>> TRYCK NEU 

_R ÅTERGÅNG <<";AT 20,31;'* 
20,26,-." 

INPUT X* 

CLS 
RETURN 
CLS 

IF RB-0 TMEN GOTO 270 
FAST 
LET R-0 

2690 FOR N-3136© TO 313604ISP-2» 

270© LET R-R>1 

271© POKE N,CODe (A0(1,R)> 

272® NEXT N 
273© SLOU 

2740 PRINT ”DIN"♦("R" RND RB-a», 
BILD"♦ ( "ER" RND RB a2 > , " FIMNS 
NU I RRMTOP" 

2760 PRINT ,,"I NRSTR TEXTRUSNIT 
T SOM UZSAS EFTER DU TRYCKT NE 
ULINe, FINNS 0UERF0RING8PROORAM 
MET LISTAT.",,, SKAIU RU PROGRRM 
MET SAMT DE UPP-GIFTER SOM UISA3 
. " , , , TRYCK NEULINE 
276© INPUT X* 

277© CLS 

3760 PRINT "MRR PROGRAMMET NOTER 
ATS FRRN TIDIGARE RNURNDNING 

KOLLA RTT RLLR SIFFROR STRMMEP 

279© PRINT ,."10 FAST",,"20 LET 

Rf-"".,,"30 FOR N-31360 TO ;3 

1360♦ (SP-2) ”40 LET R*-Rf *CHR* l 

PEEK N)","88 NEXT N", "00 SLOU" 

2800 IF AB-2 TMEN GOTO 2830 
2610 PRINT ,,"EFTER 0UERF0RINGEN 
TRR DU FRAM BILDEN MED PRINT 

2 S 20 GOTO 264© 

2630 PRINT ,, "EFTER 0UERF 0RINGEN 
TRR DU FRAM BILDERNA ENLIGT NE 
CRN ",,,"BILD 1- PRINT Rf(1 TO" 

.8(1,il,"* ,TRB 0,”5ILO 2- PRINT 

A* I ■ B (8, 1) , • TO ", B (2.a» , -) " 
2840 frRXNT , , "TRYCK "" R f '" ♦ NEUL 
INE, UILKET RAD-EAHR DETTA PROGR 

2850 INPUT X* 

2880 IF X*<>"A" TMEN GOTO 285© 
2870 C.OTO 2930 

2680 PRINT RT 11,©,"SKA PROGRAMM 
ET ©UERGES'* (RADERAS» " , ,TAB 7, "AM 

GE ""U"“ ELLER "N. 

289© LET X*-INKEY* 

290© IF X*<>"U" AND X* < >"N" TMEN 
GOTO 289© 

2910 CLS 

2920 IF X*-"N" TMEN GOTO 270 
293© NEU 

294© SRUE DRAU ANO UAITB 
295® RUN 


















istning till 

Xi c 


Detta är en Pac-Man variant till 
©ric. Där finns inga kraftpiller 
ech endast ett spöke. Man styr 
med piltangenterna. 
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Programförklaringar 

4CC-7C© rörflyttningsrutin och tantfentstyrning. 

9€€ Vinst byt färg. 

1<5©€ Förlustrutin 

2CCC-213C Omdefinering av tecken. 


'.8 POKE *280,10 
20 PPPEP 7iINK 0:CLS:°=7 

30 PRINTCHR*C4J : p RINT iPpiNT:PRINTSPCC101CHP*C271"0" ;CHR*C271 "MPUCK- 
nPN" :PRINTCHR*C41 

40 PRINT SPRINT : p P " YOL I1UST £PT SO flPNY CPKES PS YOU CPN" : p RINT 

50 PRINT"BUT ! SPOOKY TS HOUNTING YOU" 

60 PRIHT :PRINT :PRINTSPCC81CHR*C27I ; 1 P" ; 

70 PRINTCHP4C271 "LPRESS ANT KEY 1 ' 

80 GET p* 

90 GOSUB 2000 


100 

S*-" 

i 1* 

810 

: TF SCPNCSX,SYJ.64 THEN 

SX-SX-1 

110 

P'J*= 

( 1* 

820 

: IF U<1 THEN G0SL8 400 


120 

PN*= 

']* 

830 

: TF PX4SX THEN SX=SX-1 


130 

PU*= 

•C' 

840 

i IF SCRN C SX, SY} »64 THEN 

SX=SXt1 

140 

PH«- 


850 

: TF U<2 THEN GOSUe 400 


150 

P»7:CLS 

860 

: IF PY7SY THEN SY-SYtl 


190 

PLOT 

1,1, ' 000000408886908' 

870 

: IF SCRNCSX.SY1-64 THEN 

SY-SY-1 

170 

PLOT 

1 ,2, 1 OnwwwwJwnJ 1 

880 

: IF U<3 THEN GOSLe 400 


180 

PLOT 

1,3,' 0\000\800xn\8s0' 

890 

: TF PY <SY THEN SY-SY-1 


190 

PLOT 

1,4,"0s0nn\nn@n§8@n0 " 

900 

: IF SCRNCSX,SY1»64 THEN 

SY-SYtl 

200 

PLOT 

1 ,5 , ''@s0 \0 s8n0nv\\n@' 

910 

i KO=SCRNCSX,SYJ 


210 

PLOT 

1 ,6, 0--0N8\0N8iN0000‘ 

920 

: <0=SCRHCSX,SY1 


220 

PLOT 

1,7, @\NN0S0SSN\SSN0' 

930 

: IF K0=91 OP KO-93 OP KO 

-123 OR 

230 

PLOT 

1,8, ' 000N0N0N0\0\0\0' 

940 

: PLOT SX,SY,S* 


240 

PLOT 

1,9, "0N0N0S0S0N0\@N0" 

941 

: S2—S1 »SC 


250 

PLOT 

1,10, ' 0 O.\V\\\0\NN0\0‘' 

942 

i PLOT 28,10, nio'*(STR»CS21,2,53 

260 

PLOT 

1,11,'06Y0NS96g0N0N9' 

945 

: PLOT 27,10,0 


270 

PLOT 

1,12,'0SN0NSN0SNN\\\0" 

950 

: SOUNO 1,900,0: p LPY 1,0, 

1,500 

280 

PLOT 

1,13,' 0n6Os9n8\0086n0' 

980 

UNTIL S17-150 


230 

PLOT 

1,14, "0NXNN0N\\\\SS\0" 

990 

REM ********************** 

300 

PLOT 

1,15, @00690986860696" 

100P 

FOR 1=900 TU 200 STEP-10 



1500 


310 PLOT 20,4, "PUCK-flPN" 

320 PLOT 20,10, "SCORE 

330 PLOT 20,7,96 

340 PLOT 22,7, "TOH0S BY'' 

370 PX=2: p Y=2 
380 SX=14:SY=]4 
390 GOTO 700 

400 K*=K£Y*:IF h»=" THEN PETURM 
410 K=PSCCK*3 

420 IE K <8 OP K> 11 TH"H R£ TLiRN 

430 TF K88 THEN 470 

440 IF N=9 THEN 510 

450 IF K-10 THEN 550 

460 IF K=11 THEN 590 

470 PLO PX.PY,'' ■' : p X=PX-! 

480 IF SCRNINX,PY3“64 THEN PX=PXtl 
490 IF SCRNCPX.PY1-92 1M£H Sl-Sli-1 
500 PLOT PX,PY,PU*:RETURN 
510 PLOT PX.PY," "; p X=PXt! 

520 IF SCRNCPX.PY0.64 THEN PX-PX-1 
50 IF SCPNCPX.PY1-92 THEN Sl-Sltl 
540 PLOT PX.PY.PH* :R£T’JRN 
550 PLOT PX.PY," ": p Y-PYt! 

560 IF SCRN C PX.PY 1-64 THEN PY-PY-1 
570 IF SCRNCPX.PY3-92 TH£N Sl-Slil 
580 PLOT PX.PY,PN*:R£TURN 
590 PLOT PX.PY," ":PY-PY-, 

600 IF SCPNCP.PY1-64 THEN PY»PY«1 
610 IF SCPN CPX, PYJ =92 THEN S1-S1»1 
620 PLOT PX,PY,PU*;R£T'JRN 
700 REN ***** (-''JIIIJP '.OOP ***** 

710 PLOT PX.PY,PH* 

720 PLOT SX,SY,S* 

730 PPPEP P 

750 REPEPT 

760 ! GOSUe 400 

790 : PLOT SX,SY,"v" 

800 : TF PX>SX THEN SX-SXtl 


1010 SOUNO 1,1,10 
1020 NEXT 

1030 SOUNO 1, 190, :0:«JP.T 3 :PLPY 0,0,0,0 
1040 Uf-tIT 10 :SOUNU 1,1000,0 : p LPY 1,0,1,500 
1050 Uh.T 10 : SOUNO 1,1000,0 :PLPY 1,0,1,500 
1070 CLS :°=PH ! TF P-=8 THEN P=2 
1080 SC-SCt-Sl 150 :S1 =0 
1090 0-0,1 

1100 UPTT 100:GOTO 160 
1500 RE(1 LOOSE 
.510 PLOT SX.SY.S* 

'520 SC“SCtSl ! TF SC>HT THEN NI=S0 
1590 C 0R 1-200 TO 900 STEP 10 
1540 SOUNO 1,1,10 
1550 NtXT 

1560 SOUNO ,,910, 20 :i4P. T 3 :PLPY 0,0,0,0 
1640 PLOT 5,17,'GPflE OOEP" 

1650 UNIT 300:GE1 P* 

1660 CLS : p RINT : p PTNT :PRIMTSPCC71" YOUH SCOR - ";SC :SC-0:S1=0 
1670 PRINT : p RINTSPCC91"HI-SC0R£ = •' ;HI 
1680 PRINT :°RINTSPCC8.V'«N0THER TRY ?'' :GET P* 

1690 IF P*0"N" THEN 100 
1700 CPLL4022B 
2000 RESTORE 

2010 FOR I-’46P08 TO 4683: 

2020 REPO P: p OKE I.P 
2080 NEXTT""47064 TO 47087 
2050 PEPO P: p OKE I.P 
2060 NEX1 
2070 FOR 1-46592 TO 46599 
2080 PEPO P: p OKE I.P 
2090 NEXT 

2100 OPVP 0,18,51,43,83,63,30,0,0,0,0,12,12,0,0,0,0,30,63,63,53,51, 
18,0 

2110 DPTP 0,30,55,15,7,63,30,0,28,62,42,62,42,54,62,42,0,30,59,60,5 
9,63,30,0 

2120 DPTP 63,69,63,63,63,63,63,63 

2130 return Av Tomas By 
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□ ET AR VI SOM SÄLJER 


MICROBEE 


PROFFSDATORN FÖR ENDAST 

4.995:- INKL. MOMS 

• 36 K RAM • INKL. MONITOR 

• ORDBEHANDLINGSPROGRAM 

• 80 TECKEN PER RAD 


Den flitiga datom som redan tagit Australien med 
storm börjar nu erövra Europa. 

VI FINNS I AKADEMIBOKHANDELN 

SPIR AB Data AB 


OÖTEBOKG N. ll\>l\4,i\T\\ 32-34, TELs 031-17 28 30 
STOCKHOLM >1ÄSTEKSA>1 l ELM.ATA \ 32, TELs 08-10 03 »5 



SPEL TILL PRISET 
AV EN!!! 


i SAI JOMP 
JSASKETBOU 

4 ‘»JU.*» 

5 BFLAKQUT 
fl ;auSMl« 

7 STAAIRE* 

B MAAliAN 

xNOC* OUT 

9 SOGGUS 

10 Al*N ATTAC* , 
n LUNAP lANOE» ■ 
1? MA2t tA1t« 

13 VMCnOlHAP 

14 MOTOPAA» 

15 lAB y OiS ' m 

16 SKlTTltS 

17 SciHLES 


9 S*< aiA 
i i*NaS 
3 SOLA» SmiP 


> CAvfBN 
i LAS£» 

’ Alien 
I CAAGO 
I IMF OACE 
1 TMf SA ULL 


I acrxvis 

l ^AIDfOS 
i *«10 


36 OOAOOCXC 

37 SPAD StARCM 
36 INHONO 

39 NIM 

40 VOVACCP 

41 SKETCH PAD 

42 0LI7.* 

43 HS»«NO MtSVON 

44 MVStlCAl 
DULMONOS 

45 uAiA«» CWENCE 

46 CWMtR 

47 JETMOSIU 

46 (>4‘«4 l JUMP 

49 ATTACAEB 

50 SPAD MISSION 


Ja, nu kan vii Sverige köpa den 14Q*- 

Engelska succékassetten som l*+57*“ 

har 50 spel till det låga priset: _... NU sänkt pris 

® Galler endast denna annons. 

Ja Tack, Jag bestflller.st till: 


□ VIC-20 □ SPECTRUMD DRAGON 

□ ZX81 □ BBC □ ATARI 

Jag vill dessutom beställa följande 


□ APPLE 

□ ORIC 

program: 


□ GRATIS KATALOG!!! (Vi har totalt drygt 1000 

program, ange dator, även VIC-64/ej Apple) 

DATOR:_ 

V.G. bifoga 5> i frimärken för portot 
O Postförskott (porto x P.F. Avgift tillk) 

□ Postgiro 989839-6 (portofritt) 

NAMN_ 

ADRESS_ 


TELEFON.. 

M-IJ. 



■WEBCOT 
BOX Bl 3 
OLAUS 

MAONUBV. 40 
1 Bl 48 


OROER: 

TEL. 

08-38 B7 OO 
08-81 1801 


johanneihov Åte rf örsä I ja r B sökes 


MASSOR AV SPEL 


BL.A: 

SPECTRUM: 


Armageddon/Ocean 

89 

Frenzy/Spectrum G 

89 

Xadom/Quicksilva 

125 

Styx/Bugbyte 

99 

Paras/Lohtlorlen 

109 

Hobbit/Melbourne 

229 

Penetrator/Melb 

109 

Jetpack/Ultlmate 

99 

Pssst/Ultimate 

99 

Sheepwalk/Virgin 

139 

Quest/Hewson 

89 

Arcadia/lmagine 

85 

Quill/Gilsoft 

229 

Valhalla/Legend 

245 

Cookie/Ultimate 

99 

Heathrow/Hewson 

125 

Nightllite/Hewson 

89 

Maziaks/DKTronic 

109 

Robber/Virgin 

105 

Aticatac/Ultimate 

99 

VIC-20: 

Arcadia/lmagine 

85 

Jetpack/ Ultimate 99:- 

Munchman/Solar 

79 

Scrambler/Solar 

79: 

Bewitched/lmagme 

85 

Envahi/VIrgln 

115 

Chopper/Sumlock 

109 

Destroyer/Suml. 

109: 

VIC-64: 

Hobbit/Melbourne 

229 

Arcadia/lmagine 

85 

Stix/Supersoft 

149 

Skramble/Term 

149: 

Galaxions/Solar 

125 

Gridder/Termlnal 

149 

L.Balrogs/Supers 

115 

Lander/Ch.8 

149: 

ORIC: 

Moria/Severn 

109 

Galaxlans/Softek 

109: 

Invaders/Arcadia 

85: 

Bozy Boa/C DS 

89 

DRAGON 

S.A.S./Peaksoft 

109: 

Startrek/PSS 

125: 

Nightflight/Sala 

125: 

CastleAdv/Virigin 

129: 
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□ TIME RUNNER Ett action- 
spel av högsta klass. Du skall eröv¬ 
ra huvudrektangeln bit lör bit med 
snabbhet och skicklighet. 


DVORTEX RAIDER Du har 

din automatvapen-bestyckade mo¬ 
torcykel till hjälp. Försök att hitta 
piratskatten! 


D DEFENDER Äntligen lör VIC 
64! Känt från spelhallama. Alla 
talar om det! 


□ FROGGER 64 Ta den lilla 
lunky grodan genom alla möjliga 
och omöjliga hinder. 


□ SIREN CITY Kan du inte hålla 
tungan rätt i mun är det här inget 
för dig. Endast lör den kräsne! 


□ CUDDL Y CUBURT Du skoll 

hjälpa en Q'ber t att inta Faraos 
pyramid. Pröva! 


□ V/C Innovative Compu- 
ting Book. 


en 

sin llickvan Kom ihåg otl snolåglar hatar vol 
ten! 

8 oOka leve Is! FörAtariSYlC 64. Disk & Kassett. 


DCRAZYKONG 64 Stoppa 
Kong! Du har alla medel till lör- 
logande. Men han är stark... 

□ PANIC 64 Jagad av monster! 
Hjälp dig själv med tidsinställda 
bomber. 

n STAR TREK 64 Du är kom¬ 
mendör på rymdskeppet Enter 
pnse Allt hänger på om du kan visa 
beslutsamhet. 

□ TOKEN OF GHALL 

Ahhggh! Du var inte pä din vakt! 
Här är det fullt allvar. 

Li ASSEMBLER 64 För egna 
maskinspråksprogram. Kommer att 
underlätta ditt programmerings- 
arbete. (Nyttoprogram). 


Återförsäljare sökes! 


^=~ -n/ore 

Box 18007,750 18 Uppsala. 
Telefon 018-42 98 27 

Skicka de kassetter jag kryssat för 
mot postförskott. uruKt4 

□ VMC RUNNER D SNOKIE □ STAR TREK 64 

O VORTEX RAIDER □ CUDDL Y CUBURT 11 TOKEN Of GHALL 

O DEFENDER C SPRITE MAN 64 LSCRAMBLE64 

□ FROGGER 64 □ DEFENSE □ ASSEMBLER 64 

O SIREN CITY □ CRAZY KONG 64 O V(C Innovative Comp 

ting Book. 

Namn:. 

Adress: . . Skicka in kupor 

PosJodress:. . redan idag! 


O SPRITE MAN 64 Poc Man 

nu lör VIC 64. Spökena har delin- 
tivt mte blivit snällare. God bless 
you! 


□ SCRAMBLE 64 Välkänt. 

Men den här versionen innehåller 
allt! 


D DEFENSE En exakt kopia av 
spelhallsversionen. Minst 3 K extra. 
T+J. 


TIME 
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ARCADE ATTACK 

Arcade Attack" är ett Basic-program som utnyttjar 
VIC-64:ans ljud och grafikmöjligheter till fullo. 

Spelet går ut på att du skall lotsa dig igenom 5 olika 
stadier uppe i rymden. Först blir du anfallen av raketer och 
det gäller att styra undan för dem. Sedan skall du tanka 
upp ditt skepp för den fortsatta resan ut i rymden, det gäller 
alltså att se till att nå fram till tankbaren innan ditt bränsle 
tar slut. 


När du klarat detta så skall du landa på en måne men se 
upp för meteorer som är i vägen. Du måste landa på 
landningsplattan i mitten, här kan du bromsa genom att 
trycka på Fire-knappen på |oysticken Om du nu väl lyckats 
landa så kommer det en massa “Aliens" som du skall 
skjuta ner. Din laserkanon har autofire så du behöver 
endast flytta till vänster och höger för att klara detta 
När nu detta är över så sänder ditt moderskepp en 
laserstråle som du skall äntra. Om du skulle klara allt detta, 
är spelet slut. 

Du använder joystick eller tangenterna 1= nedåt 
2=höger CTF1L= vänster och <- = upp. Starta med SPACE- 
tangenten och ställ in svårighetsgrad med Fl -tangent. Det 
finns 30 olika svårighetsgrader 
Ta det lugnt när du knappar detta program och kolla 
noga raderna med tidningens - om du gör detta så vet vi att 
det kommer att fungera. 



‘ »-0FE54 C 0IH = 1000 IMS*»*ARCADE ATTACK. . . - iWE-33tOP-3®O0e«FÖ-e040»WD«33lVft-3 
INT '»J* I V *33248 * PQF-EV *2 1 .0 i POKE V*33 .0 i POKEV *32 . O » P «£00 « RS »26 i T-73 »SC -0 

* k* is®»233 icr*o 

@ H-'4e?i.vO-H«23iWft.H*3«ÄT.H»4iLO-H-llSO-H»5»VI-l3lMI-0«6P-e 

• • OR*W007Oei4lRORC •0TO62>REA08<P0KEA»64»C ,Bir>CMTirCXT 

"''T'"' 0 * ,vo 0 0 0 0.0.0,0.0.0.0,0,31 .0,0,88.8, I .28.0,0.83.160. I *0.63 .£54.0 
l.-‘ DAT#* 139 ,£24 .0.28.8,0.28,0.6,3 I .6.8.8 , 6.6 .6,8,0 ,6 .6,8,6,0, 6,6 .0 .6 00000 

2t 0-0 O 0 0.0 O 0.0.0. 6 .0.6. 6 . 6 ,0,6.0,31, 6 ,4.£ 8 .0.72,139,224,34,93, 190,4 

dc DATA3t.££4,| .g& 0.0.31.0.0,0,0.0,0,0,0,0,0,0,0,0,0,0,0,0 0 0,0 0 O 0 0 0 

11 MT,W -" •« «■» ■« .e.a.e.e.a.a.e.a.e.*.i33.3i.e!is.»3.'ié, !/£.is3.£34.£ 

*d O*»1«93 160P .J 10.O,0.0.0.0,0.0 0,0,0,0.0.0,0,0.0,0.0,0,0.8,0.0,0 0 0 0 
4i c.c.e.o 0 o.o.r.o.e.o.o.e.o.o,B,o.o.e.e.4,B,o.i45j3i.is4.rä!95.M4,äi.3 

OATA224 M « 6.0.6,6.6 .0,0,0,0,0 .0,0 ,8,0.0 ,0,0,0,0,0 ,8,0,©,0,0 0,0 0 
31 DAT4.0 r 0,0,58 O O l£4 6.0,234.0,0.238.0.7,239,182,13.239.£24,3l,£53,240,b I 
nv 0AW33. te? £53.£32.63.189,232,127.128.£34.234. |£b. t£7.£40. i 10.13.0.118.0 
-• OATA0 ' t A 0 1 24’. 126 233. 192,1 .233.128.0.253.0.0.128.0 

► I D*»AA 0 -.1 | C 0.0 ,8 C.32,0,0.0.0.130.6.64.0.0.0.0,0.4.32.0.0,0.0,0,0,33,0 
e OATA 0.0 0.5 0 8,0.0.0.0.16,6-0 - I,0,0,0.0,130,0.0,0,0.16.0,0.0,0,0,0,0 
t OATao 16.0 O .0 .0.36.0.0,56 .0,0,36 ,0 .0.36,0.16 .36, 16,16.124.16.36.68.36 .36 
-? .i»t«iS4.4 t W.W.5* 56.?»4,5S.S7.253.36.5».2K, 164.63 .£55 .£48.59.£55. 184,36 
7a 0ATA234,36.16.36,16.0.0,0,0.0 0 , 0 ,O.O 

9! W"? f.«.C 7e,0.0.72 0,4.72.128,2,253,0.1.222,0,3.£33.0.31,123,£e4.3,233 
? 0ATA6 ?l.239,224,3.127,0.1.246,O,2,£33,0,4.7£,128.0.72.0.0,72,0.0.0 0,0 0 

93 DATA0 0.0 0.0 0 ,fl o.O O 

tAI OATrtc O O O 0 O O •) O C O.O,0.0,0,0,0.0.0.0.0,0,13,253,3,193,234,6.96 .232 
“* DATA31 £33.240,234.U £24 31.233.240.6. 96 .£32.3.133.£34.0.13.233.0,0.0.0.0 

I03 DATAO 0.0.0 0,0.O.O,0,0 


| 131 fA743,233.0,3,233.0.3.233,128,3,233.64.3.233.3£.3.233.16.0.232.8.0,232,4.7 

I ,3£ D^TA233.132.7.1,143,7.63,139.7,63.176,7,63.166,7.3.128.7.63.128.7.63,128.7 
| 133 DATA63 128.7 63,128.7,233.129 13.253,19c,15.233.19£ 

134 DATAO, 128.0.0.0,0 0.233,0,0,0,0,l.233.128,0,0.0,3,129.192.0.0.0.7.0 .££4.0.0 
I3* DATAO.13.233.240,0 0.0.31,235.249,0.0.0.36,0.28.0,0,0,I12.0,14,0,ö.0,£24 0 

136 OArA7,0.0.O,O.O,O 

137 DATA0,£4 O.0,24,0.0.24.0,0,24,0,0,24.0.0.24,0,0,24.0 

138 DATAO,£4 0.0,24,0,0.24.O.0 ,24 ,0 ,0 , £4,0.0 . c 4.0.0, c 4,0 
lj 139 OA T AO,24,0,0,24.0 0,0, O, 0,0.0.0,0,0,0.0,0, O 0 O 

148 o.a?. I9£.0.£55.B5£ 0.£55.£55!l6£.£5S.£55,£40,48.t9S.e.£55,£S3 

14 1 05W40 £55 .B55, IBB ,£55 ,B5B .0 .B5S ,B 16 .0 ,£5B .£8,0 ,B5£ . IS.0, 36.6,0.96 .6 .0.1 l£ 

I4£ DATft3,£43.0.3,B4e.O,O.IB,6.0,IB.0.0.6,.,.,31,6,0,1£7 

143 D0T00.0 63 0,3.255 O 63,255.3,£30,£55,13.£33.£55.0.193.IB,IS,£35.£53,3,£S5 

144 O*T(*£33.0.69,£55.0,B7.BSS.0.36,63.0,48.63.0.36,6,0.86.6.31.IS£.14.31.19B.0 

145 OATA40.O 0.48,0 e.96.0,0,248,0,0 ,£34.0,0 

146 DATA0 O.O.0.60 0,0,126,0 0 .233.0,0.60 ,0.0.36.0.6,68,0.0.60,0,0.60,0,0.60,0,0 
I 14T DATA6P.0 0.126,0.0.126,0,0.118.0,0 110 Q,0.118.0,1,239,128.3.235.192.1.255 

140 DATA 126,0,£33,0.0,126,0,0.0 

149 REM».. IMTROOUftTION ••• 

130 150»Kl*1301 r-Oiri>255iF0KEV,KlRGTEV*I, > ;P0KEV*2,XIIPOKEV*3.t 11R0KEV*2I.3 

131 PR1NT-J-IT-73 

160 ROTEFG 210 iP0KE2041,210 tPOEV*39 9 f POKEV »40,31POKEV*23. 3 * PO* EV *29 3 
I .’0 > >r«e.9<Y]>Yl-| .2 

I 160 PO* C V.V iPOKEV♦I .VIPOKEV*2.HllP0KEV*3,T1 
; 190 IF'» '63TMEN210 
700 GOTO176 
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I 






eie 

220 

230 

£ 3 ? 

£37 

240 

£90 

259 

£6C 

265 

270 

290 

295 

3O0 

3 10 
314 
312 

314 

315 

316 

317 
316 

320 

321 

322 

329 

330 

331 
HO 
350 
360 
3-*0 
390 
165 
390 
40f 

4 JO 
420 
425 
4 30 
440 
490 
500 
901 
510 
911 
512 
920 
550 
960 
569 
5?0 
97| 
972 
580 
509 
999 
600 
601 
602 

604 

605 
610 
6?0 
€30 
640 
645 
650 
6C0 
665 
670 
675 
680 
690 
699 
-*oo 
710 
7|| 
712 
7 I 4 
720 
7 30 
740 
790 
760 
770 
900 
009 
910 

et i 

920 

630 

631 
840 
850 
860 
861 
862 
863 
065 
8?0 
97t 
080 
885 
890 
900 
910 
92 * 

921 
930 
950 
960 
965 
970 


PPINT‘1 

PRINT*; 


***C*DE * 
TTACK.64...* 


PR INT 

I* »PR I NT l GOSU8 10000«POKEVO , O 


■V.R. J.O1B0 
PPINTiPPIMTiPRtNT 

PRINT"#*NVA*CI DIN SKICKLIGHET OCH OtTT OMOOME 
PPINT-O POR ATT TA D16 GENOM EN AKClOS RrWD.. 

PRINT-* RAKET PORT ..."IRS 

GETAB» 1FAB- *« M THENRS-R9*t 
1FAB-" •TMEN295 
PPINTTD* 

IFR6-50THENRS-20 
00T0240 

REM»•• RAKET ••• 

PCF.EV*33,0sPOKEV *32 .01P0KEC041 ,£06 

PO* EV•2I 0«X-O»K1*233» >-1501YI-150IPR1NT*J »PO»£V*23 .0«POKEV*2S ,3 
R 0» E V . X»*»0KEV♦l,YlPOKEV *2.X11POKEV•3,Y1 iP0KE2040.200 
PB!NT-«3 VARMIFO VARNING .RAKET KOMMER 1 » ' * 

PO*E53265 . PEEM 53265 >6143239 

KOBA»OTO8Ct0*INTfRFC* I)»359>»POKE1064»B,46»P0KES9336*B.11NEXT 
F0®A«0T08JB-INT< RNO< 1>»959 • IPOKE1064*0.B 1»P0KE55336«B.2IFCXT 
»0-E53265.PEEK' 53265 >0R16 
G03UP7I00 
l ORA-OTO J 0001NEXT 
PO* EV*2I .3IP0KEVO9.1 

PRIMT-W « 

PP!NT*ap»**ET RAKT FRAM , SE UPP " 

POK EVO I5«PO*EAT.0O»POKEWA, 129 
PO*EV3C.Ot3V*PEEK< 56321 >tJV-15-< JVANO 15 > 

PCWEFO .P«P-P*l« lFP>2O3THEF4»*é0« 

IFJV-1THENY 1-Y1-6 
IFJV*2THENY1*Y1*6 
X-y*RS»XI ->‘l- I> POKEWA,33 
!F'->Y|THENY-Y-3 
IFr YITHENY-Y*3 
PO»EWA.129 
jrvj 230THENY1-230 
IF l 93THEFf» 1-50 
IFV|< I40THEN550 
1F« •250THCr«<-et Y-YI »SC-SC* 100 
POKEH .56lPOKELO .67 
lf< PEEK< V *30 > AF02 > -2TMEN50© 

PO* EV .X »POKEV* I .Yl POKEV *2 . X I i POKEVO. Yl »POKEWA .0 
GOT033O 

POKEWA 0« IFX<50THC»B<-X1 

P0KE2040.205IPOKEV*29,0»POKEV*4C.SiPOKEV*21.1* 

FORA-14T00STEP-0.2* POKEV*23,l«POKEV*29,1»POKEV*23 .0»POKEV*29,0 
BOKEVO AiPOKEWA,!29«P0*EAT.15»POKESU.155»POKEH,20»POKELO,56 
«*OKEWA OiPOKEAT.0»POKESU,0«NEXT 
PO»EV*21.OsPRlNT-J- »FORA-OTO100«NEXT»OOTO50C0 
F09A-0T0200«FCXTiP0KEV*ei.2 iPOKE204©,209 iPOKEV*23.1 
POKEV*21.2iX*OlY*l00»POKEV,XiPOKCV*l.Y«FORA-0TOSO0»»CXTIP0KEV*£!,9 
REM* • » T AF* NING ••• 

PO»EWA 0«PR!NT "00 BRAMSLESKEPP PA VAG ... " 

POKEVO 15 * POKEAT.89 * POKEWA . 1291POKESU.155 
X- v *0. 15IX t-X1*0.6 
IFX1 >254THEr* , 0KEVO.Ol00T0800 

POKEV. y IPOKEV* 1 ,YlP0K.£v’*2,X» »POKEVO.T1 I POKEH, 71 POK ELO, 89» POK EWA . 129 
OOT0572 

POKEVO. 15«P0KEAT . 891 POKEWA. 33 IPOK.ESU, 155IP0KEH.2 
POKEV*?e.Oi JV-PEEK<56321 >i JVI9-< JVAK)15> 

PPINT“H BRÄNSLE*TlIFT<OTHEN4998 

WD-33 

IF JV- 1THENYI-Yl-2» T-T-0.5»WQM29i VA-19 
IF 3V-2THENY 1»Yl*2lT-T-0.5»WQ*l29»VA»15 
JFJV*4THENXI-X|-2IT-T-0.5IW0*1291VA-10 
IF JV-0TMEFCK 1-XI »2IT-T-0.5* 140 ■ 129 > VA - 10 
IPX 1 '250TMEF* 1-250 
IFXI/S9THEWI-69 
fPYl'230TXEMY I-230 
!P Vl< 5 3 THENY1-53 
PDFEV*2. XIiPOKEV*3,Yl 
IF- P EEK ( V*30 >AN02’-27HEN690 
POCH VA »POKELO. IMTt 60^256 »l PO» EWA . NO 
0070601 

POKEVO.0IP»INT*« BONUS FOR PART 

SC *SC *T*100 

PRI»l7-|«i DOCK N INO O.K. TAKB.NING PAGAP »■•» 

FORA-eT015OiPOKEV*39,AIP0KCV*40,A*l «FORB-0TO5O»f-CX T l PR l NT • .**,»*■*« t.... ^ , 

POKEVO 151POKEWA,33iPO»EAT,15»P0»ESU.1551 PO»EH,Ai PO»ELO,C 
C-INT< R*E>- i > *299 IIPOK.EMA.OIPOKEAT ,O«POKESU.0 
T - T • 3 I PR I NT “CX3" i NEXT 

PO»EV*40,2 

PPIN7‘«I ...TANKNINO AVSLUTAD... 

k 1 -XI • 1IYI*Yl-2IX-X-0.5 

IF Yl* 30 THE »POK EV *2 1 ,0 i GOTO80O 

POKEV.XiPCKEV*!,TiP0KEV*2,Xi:P0KEV*3.»l 

6OTO740 

V-53248»FORM-0TO40»PRINT*** l»«XT 
P0»E53265.PEEK< 53265-AND239 

FORA-6T080«B-INT< PND< 1 > *959 ) l POKE 1064 «B . 46 l P0KE55336*B . I »NEXT 
P0RA-0T08 «B - INT< R»Cl( 1 > *959 ) IPOKE 1064 *B ,8 l »P0KE55336*B,2»KCXT 

PW t*JT ■ ■ --- _ _a — _ • 

pp int • ua m~ 

PRINT*«| NAN L AKON ING 

POKEV*29.299*P0KE*23.253 
POKEV*3 30IPOKEV*21.255IT3-80 
PO»£204 i ,206101-1IP0KEV*40.5 

POKEV.200»POKEV*1,150»POKEV*4.I0O«POKEV*5,1501POKE204O,207 iP0KE2042.207 

POKEV*6.l50tPOKEV«7.8OiPOKE£e43.207 

P0»E53265.PEEK< 53265>0R16 

POKEVO.151POKEAT.91POKESU,240 

POK EV *30,0 

JV-PEEM 96321 M JV-15-< JVANO15> 

IFJV-4THENXI-X1-1I0I-1iP0KEV*40.5iT«T-0.5 
IF JV-8THENX1 -X IM <0I-2> POKEV *40 .5IT-T-0.5 
IPPEEK< 197 »-60THENY1-Y1-1.5*POKEV*40,2tT-T-2»WE•129 
IFOI-1THCNXI-X1-2IPOKEV*40.51T-T-0.5 
1F01-2THENX1-X1*2IPOKEV*40.5IT-T-0.5 
Yl-Yl* 1 »POKEWA . WE 

POKEH . 8 1 POKELO . INT' OP^SO* »WE-17 

PO»EV*2.Xt *P0KEV*3,Yl 

IFXl '250THE»*!-15 

IFK |< I5TXENX1-250 

!PY< 28THEN5 IO0 

IPVI >205A»4DX1 >142AKOXl- 15 1 THEf<999 


* IT*1001FORA-0T0300INEXT 





979 IPY| >206THEN5I00 

976 IF< PEE»< V*30 >AN02 >-2THEN5100 

980 POK.EV*30.0 

961 IFRS*'40THENY3-Y3*O.5«POKEV*7.Y3iIFY3»20OTHENY3-2OO 
982 IFRS<-40TMENY3-Y3 *0.2* POKEV *7.Y31 IFY3>200THENY3*200 
963 PR!»n » i t 

904 PWINT-m- 

905 00T087© 

999 PR IN" BSWI WWOT 
1006 WIHT-CUI 



BRÄNSLE « * » Tl !FT< 0THEN4999 


■*i Y-TlIX-XlIPOKEV,X 

1001 P0KEV*21 ,2iF0RA-0TO5OOi»CXTlPRlNT ,, « 

10 10 POKEV ♦ I . Y > POK E V *2.70»POK E V ♦ 3,0 »PO» EV *29,31 POKE V *23.2: PO».E650.2551 POKE VO . O 

1020 POKEV *2 1 .3 * POKE2040.206lY-2041X1-70IY|-0iX3-X*10« r3-T-10»P0KE650,255 

1030 POFEV30.0» JV-PEEK» 56321 >1 JV-l5-< JVAK) 15 > l POKE204 l .204 

1040 IFJV-4THCNX-X>9lX3-X-5>M0-»IT-T-I 

1050 1FJV-8THEN>- »X*5iV3-X*5«M0-2iT-T-l 

1060 IFM0-2THENX1-X1-3 

1070 IFM0-1THCNXI-X1-3 

1080 1FV1 >249THENXI-25 

»090 1FX125TMCNX 1-245 

2008 lFX>242THENX-£4£1X3*252 

?001 IFX<25THENX«251X3-35 

2010 Yl-Yl*101 IF< PEEK' V*30 >ANO1>•1TMEN3100 

2015 PR lNT*MtabTOANOi “ISC »PRIM' -fi^.K».*«*«*4-»^gg.*^ l o^*jB.. g • . r 

2016 PR I NT»POKEVO, 151POKEWA.33«POKESU,255»POKEAT.15»POKEH.20»POKELO.120 

2017 POKEMA*7 33«POKESU»?,15»P0KEAT*7.255«POKEH*7.120»POKELO♦ 7 .20 

2020 POKEV.XIPOKEV*l.Y»POKEWA.O»POKEAT.OIPOKESU.O 

2021 POKE WA *7,01 POKEAT*7.0» POKESU*7.0 
2030 BU-51IFT'0THEN4999 

2040 IFYl '204THENY 1-0 

2090 P0KEV*2,XJ iP0KEV*3.YHP0KE2041 ,214 
2060 IFBU-OTHEN103O 

£070 POKEV*2 I ,71 PO» E2042 ,2111 POKEV*4 ,X31 POK.EV-5 , Y3“ 10 i POK Ev *£9,7IPOKEV*23.4 

eeeo Y3-Y3-32 

2090 1FPEEM V *30)AK02THENBU-O» Y3-T-10»POKEV*2I,31HI-HI•I 1 8 C- 6 C *50 »POKEV*40.Hl 

2095 IFHI>7THENGOSUB?000 

2096 IFSPFRS^THENSC-SC *5000 »POKEV *2» . IIQ0T03200 
3000 P0KEV*5. Y3i IFY3<50TMEN3030 

3010 BU-S 
3020 GOTO 1030 

3030 Y3-Y>I0iBU-eiP0KCV»21.3 
3040 GOTO 1030 

3100 POKEV*21.1IFORA-14TO0BTEP-0.2»POKE««4C.£O5IFGKEV*23.1;F0kEV*£B. l«R0KEV*é4,ö 

3110 POKCVO.A»POKEWA.I29*P0*EAT.15»P0KESU.159»POKEH.20»POKELO.56»POKEV*40.I 

3111 POKEWA.0»POKEAT.0»POKE8U.O 

31 13 POKEV*29.0 » POKEV*17,1?«P0»EV*17.16»NEXT»POKEV*21,0«PRINT” U‘ »G0TG5000 
3200 POKEV*21 I »POKE2043,206 * P0KE2041 ,213»P0KE2042,212»P0KEV*23,6«POKEV*29.14 
3210 XI - I52»X2-2O0» Yl -0» Y2 -0» P0KEV*40.2»POKE V *4 1 ,2»P0KEV*42.14iP0».lV*21,14 
321 l POK EVA y IP0KEV*7. YIP0KEV*2 ,X1 IP0KEV*3.Y1 »P0KEV*4 . X2 »POKEV *5 . Y2 

3220 POKEVO.15 > POKEAT.5« t P0KEAT*7,331POKESU.259»P0KESU*7.255 »PO» Eum .33 

3221 POKEWA*?.93:POKEH,2 * POKEH *7,2» POKELO,1»POKELO*7,6 
3223 FORA-0TO6BSTEP0. J «P0KEV*3,A«P0KEV*5.A»NEXT»P0KEV0,0 
3225 P»lNT*» 

3230 A0«< a ■ O ■ 

3232 AC8< .t.T.M.l-UJ.T.r.t-1-l.t-T. IJf.l 

3835 PP I NT * IBM * 

3240 POKEVO.l5»F0RA*5T023»POKEH.A»P0KEH*7,A«PRlNtAB*«»CXT 
3245 00T04000 

3600 FORA-190TOOBTEP-2 »POKEV* 7,A » POKEV *5,A » POKEV *3,AI »fcKT 

3610 PR INT“^J* IPOKEV*2 I .0 

3611 G0T05000 
3620 00T04999 

4000 PR1NT-B INTA LASERSTRÅLEN 

4001 0ETA6IV3-2O5 

4004 !FAR-”*"THENK3-X3-1 

4009 IFA8-*2*THENX3-X3*1 

4010 !FX3'294THENX3-253 
4015 1FX3'25THE»4<3»25 

4020 lFX3>178THE»rORA*Y3TO6OSTEP-e.2iPOKEV*7.AiNEKTAiGOTO4Ob0 

4050 POKEV *6 . X31POK EV *7,Y3 

4055 OOTO4001 

4060 PRINT*««- 

4081 FORA-OTO18IPPINTAC8» NEXT 

4070 POKEVO.15IPOKEAT.5BIF0RA.60T009TEP-0.3«RO»EV*3.A»POKEV*5,AiPOKEV*7.A 
4080 POKEH , 2 » P»3KEH*7,2* POKEWA . 33 i POKEWA* 7,331 »Ex T 
4096 GOTO5O00 

4699 PR1NT*H 0 I TT PRAFCLE TOG SLUT M * i FORA-O T05000 IKCXT 

5000 POK El4A • 7 O » PP I NT **J* t POK EV*2 I ,0 » IFSC >HSTHE»N9-SC l 00SUB5200 

50»0 PP »NT - © B6M B I OU LYCKADES FA *8C* POA»<G PA 0 I TT UPPORAG * I PR INT 

5020 PRINT* HOOSTA POANO AR *HS*PR|NT 

9040 PRlfVT* HÖGST POANO HAR * » HSB» PR INT iPR INT 

5050 PR I »4T«PR I NT * ■ TRYCK PA KPACEV FOR ATT FORTSATTA* »POKE 136.0 

5060 OETAR 

5065 IFA*< >• * THE»45060 

9070 POKE650.0»SC-0»HI-0«SP-0»POKEVO.0«POKEWA .O«POKEAT,0»POKEWA*7,0 
9060 RESTORE »PR INI JW WB WWttW TRtCK P« EN KNAPF "»GOTO250 

9100 P0»CV*21,2«F0PA-|4TO0STEP-0.2»P0KE204l,205»POKEV*23,2iPOKEV*29.2 
5101 PO» EV *23.O»PO» EV*29.0 »POKEV *40.1 

5l0f POKEVO.A»POKEWA . I29IP0KEAT I5»P0KESU.155»POKEH,20»POKELO.56 
5 1 03 POK EW0.0 » POKEAT ,0 sPOKESU . 0 » »CXT 
5104 OO T O5OO0 

5300 p»I»IT*j- »POKEVO, I5»R0KEAT,32»P0»ESU,255 

5201 POKEAT* 32«PO»EaT* 14,32 iPOKESU*7.255»POKESU14,255»POKEWA *7,33 

520? P0»EW»*14,33«P0KEWA.33»F0RA-2000T026000bTEP240 

5210 POKEH.A-INT- A/256 >*256»POKEH*? ,8»POKEH* 14 ,6 

9220 PRINT*■••«•• HÖGSTA POÄNG ••••« HÖGSTA POÄNG ••••*- 

•230 »4[XTA i POKEVO . 0 »PR INT m % J m 

5290 POKE 198 0» INPUT**»P1V OITT NAMN FOR MOGSTA POAWlHS* 

5300 IFLEFK MSB' > 19THEFBISB-LEF TB* HSB , 19/ 

5310 RETUR»» 

7000 FORA-14T0CSTEP-0.2IP0KE204|,205»POKEV*23.2»P0KEV*29,3»POKEV*23.0»PU»EV*2B,I 
?010 POKEVO. AtPQKEWA. 129» POKEAT . »5»POKEH .20« PO» ELO ,56» FOK.EV *40 . » 

7020 POKEWA ,O»POKEAT,0» POKESU,0» »CXT 

?0?0 PO*EV*23,2»POKCV*2S,3«r|-0«POKEV*3,YllPOKE2041,206»POKEV0.15 
7040 Hl*0>SP*SP«I»SC-SC *50*RETURN 

7|0A POKEVO . 15«POKEAT ,56»POKEAT*7,33«PO» ESU. 255» POKESU*7 ,255»ROKELFi ,33 
?l10 POKEWA*7.33»POKEWA*14,33»POKEAT*14,Je»POKESU*I4,255 

7 120 FORA* 1T08IPOKE5328I , A » FORB-0TO60 « P«> EH . B « POKEH * 7 . B »POKEH ♦ 14 .B « NEX TB « »«.XTA 
7140 PO» EWA •7 O iPOKEWA*14.0* POKEVO.0 » P0KE53281,0» RE TURN 

10000 PO»EAT 33»POKEAT*7,33 »PO» EAT.14.33»POKESU.255«P0KESU*7.255»POKESU*14.255 

10001 POKEVO,15 

10010 POKEWA.33»POKEWA*7,33»POKEWA*14,33 

10020 FOBA-0TO8O«B*R»C' 1 '•< 7-3)*3 » POKEH.B » POKEH *7,B » POKEH*14,B » POKELO.6 
10030 FORC-OTO100 * NEXTC » »CXTA « R£ TURN 
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VENSKA ÖOFT 


Service 


Nr 2035 48K RAM 

LUNAR JETMAN 95,- 


Säljes även genom Domus o OBS 
samt Esselte's kontorsfackhan- 
del. 


<PCo 


,0' Nu kommer ULTIMATES 
^■y' LUNAR JETMAN att tala till dig 

genom TVn om du kopplar mig till 
din SPECTRUM 


•Tal och SPECTRUM ljud från din TV 
•Obegränsad vokabulär o. tonläge 
•Inbyggd Software driven av custom grind 
matris 

• Lätt att använda: LET S $ = "HE(LL) (OO)" 
kommer att säga "HELLO" 

•PLUS en ny våg av programvara på väg 
från många Softwareleverantörer 


Nr 2970 


Nr 2036 48K RAM 

ATICATAC 95- 




Härmed beställer jag mot postförskott 
utan extra avgifter: 
st. nr. 

SSS 

-Box 3035 

St. nr. _ 531 03 Lidköping 


st. nr. 



Återförsäljare välkomna 


CURRAH - MICROSPEECH 445,- 

Med svenska instruktioner 


Namn 


! Adress _ 

j Jag bifogar 3:60 porto för SSS katalogen □ 


3 megabyte kunskap 


Varsågod — här får Du direktaccess till drygt 3 megabyte 
samlat kunnande om Sinclair Spectrum, V1C-20 och VIC- 
64 — i bokform. En guldgruva, ja faktiskt Din viktigaste 


kringutrustning! 

M Lord: Upptäck Spectrums BASIC (2:a upplagan) 135: — 

B Maunder: Skriva spel för Spectrum 135:— 

D Lawrence/M England: Mastercode för VIC-64 145: — 

A Dickens: Elektroniken i Spectrum 120:— 

T Hartnell/M Ramshaw: Spela VIC! 75 spclpro- 

gramlisror 135 ;_ 

T Cruse/TJohansson: Maskinkodsprogrammering 
från början (för Spectrum) 120:— 

I Logan: Spectrumfakta för effektiv programmering 145: — 

Programmeringsguide BASIC för Spectrum 18: — 


Köp direkt per telefon 018/32 05 75 (hela dygnet) 
eller i välsorterade databutiker, bokhandlar och varuhus. 
Alla priser ca-priser inkl moms (vid direktköp även inkl 
* frakt och postförskottsavgift — inget tillkommer). 

nn APPUCA INFORMATION AB 

Ivl Box 9014. 750 09 UPPSALA 


BESTÄLLNINGSTALONG 

Skickas till Applica Information AB. Box 9014, 750 09 Uppsala 
Jag beställer 

_ ex Lord: Upptäck Spectrums BASIC ä 135: — 

_ cx Maunder: Skriva spel för Spectrum å 135:— 

_ cx Lawrcnce/England: Mastercode för VIC-64 

ä 145:— 

- cx Dickens: Elektroniken i Spectrum ä 120:— 

_ ex Hartnell/Ramshaw: Spela VIC! ä 135: — 

- cx Cruse/Johansson: Maskinkodsprogrammering från 

början ä 120: — 

- cx Logan: Spectrumfakta för effektiv programmering 

ä 145:— 

_ cx Programmeringsguide Spectrum ä 18: — 

Namn:. 

Utdelningsadr:. 

Postnr/ort:. 
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VT/ 






ARCADE 

ATTACK 


ASTRO RUN 


ett spel om 
pirater 


Varsågod, här är kassettinlägg. 
Klipp ur dem och lägg i dina 
kassettfodral. Både praktiskt och 
trevligt när du har dina program från 

Allt om Hemdatorer. 
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Z P!S 1 PIS 7 . DIS I DIS 
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GNIJRGLGRNAS 

ÅTERKGMST 




PANNKAKSMANNEN 
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Z P!S 1 PIS 7 DIS i me 





















Sid 2 
































Sid 1 













































































































UNDVIK 

UE C LA, KA V 
F C DC Ii 


xKXV 

■sESS-e» 


DET 

BROTER! 
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V✓ 



SPACE- 

AnACK 


OXYGEtfE 

PAHC 
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Z P!S I P!S 7 P!S I DIS 
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MER ÄN STEL... 

GRANA SOFTWARE 

Telefon 018-3980 77, 018-3980 57 
Katalogbeställning: 018-11 3003 

Återförsäjare: 

Bollnäs: Dataprodukter AB: Borås: BDE Data & Elektronik; Enköping: Enköpings Kontorsservice; Fagersta: Arne Andersson Radio, 
Fagersta IT AB; Falköping: Norders Bokhandel; Falun: Blids; Göteborg: NK-Elektronikshopen, SCEAB, AB Westium-VIC Center; Gävle: 
Nlodulljud, OK Bilradio; Halmstad: VIDEO-Rent; Härnösand: COMDATA, Agrens Radio; Johanneshov: Årsta TV-Service; Kalmar: Kalmar 
Minidata; Karlstad: DATAN; Linköping: Datamäklaren; Lund: Record Radio AB; Malmö: DISKETT, Teleradio, Skandinaviska Datatillbe¬ 
hör; Norrköping: Nordströms Kontorsmaskiner; Osby: Sven Andersson AB; Skutskär: DatorHallen; Stockholm: Computer Express, 
Databiten Ljud o. Bild, Elikon Kontorsmaskiner, NK-Ljud o. Bild, Pet Commodore Center, Svea 01 Databutiken, Stor & Liten-Framtidsbuti- 
ken, TDX Smådatorer AB, VIC-Center, Åhléns City; Strömstad: IFEA Foto & Data; Sundsvall: Ljudelektronik, Databutiken; Säffle: 
Kullanders Radio & TV; Uppsala: Maskinaffären Fyris AB, Silicon Valley; Varberg: Varbergs El-affär; Vetlanda: Databutiken i Vetlanda; 
Västervik: Data Ekonomi; Västerås: Broddfors Zoologiska, Ravemo; Västra Frölunda: Wettergrens Bokhandel; Växjö: Expert; Örebro: 
Dawidssons Maskinaffär, Wijks Datorer; Örnsköldsvik: Databolin. 
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Detta spel är gjort för Vic-20 och laddas i två 
omgångar 

Del två laddas automatiskt. Knappa först in del ett 
och spara denna på band slå därefter in program 
på och spara efter program 1. När du knappar och 
får problem med till exempel grafik-symboler så 
titta på sid 72 där du finner Tips och program¬ 
inslag. Där finns också alla Vic-20:s grafiksymboler. 

Spelet går ut på att du skall försvara Grottbasen från att förgöras 
av glupska spindlar. Du styr en kanon som rör sig på en bro. 
ovanför basen. Från grottbasen kommer spindlar som måste 
skjutas innan de kommer under bron, annars äter de upp basen. 
Men det är inte bara spindlar som hotar utan även bomber och 
grottmonster. Se upp för de bomber som du inte klarar av skjuta 
ner, dessa gör hål i bron där du kan falla ner. Det krävs mycket 
träning för att få se grottmonstren. Först måste du förstöra alla 
bomberna. 

På bilden kan du se hur spelet ser ut i aktion, mycket bra grafik och 
full skärm. 


Program 1 

0 m*» eo"«s*--ee* 

10 P0KE56,ee 

20 FORW»OTOI3«RE0ON«POKE7»66*M.Nlf*XTiO0T00.0.0,0,0. | .233 , t . 13,187 . J 96 . J 32.235 . | 
27.4.6 

30 FORM-OTO 15» REftONi P0F.E7 184.M.NI KIXTi 00 T«« ,0.0,0.0,0,255,0. 130.199.226,234,234 , 
224.126 

40 FORM»0TO 13* RE0ONI POF.E7200 »H N» NEXTi O0T064.3 . »3.31 ,63,233.233 .226.234.234 .226 , 

233.234 

43 00T0233,233.233,233,»92.240.248.232,233 

30 FORH»0TO »3* RE0ON» P0KE72 »6>M,N> FCXT *D0T0233,191,191.»91.»43,233,233,233.233.23 
3.233 

66 FORM«0TO13iRE0ONiPOKE7232*M.NiFCXTiO0T0233.233.133.»33.133.»33,133.233.233.»3 
3,133 

63 D0T0I33,»33.»33.233,253.233,233.233,233.233 
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7« FORM.OTOlSiRtSONiPOKE7«,e.M,NI.«>(TiO«,T<«3S.»5.ra.M3.033.033.0SS.0aS.0S9.03 

3,W5 

*® FORM-OTOI3iRE0ONiPOKE7264*M.NiF«XTtO0T0128. |28 , t»2, IBS .224.224 .£40.240,248 .24 
0.232 

83 D0T02S2.?54 234.253.233.233.170.233.129,66 

90 FORM.OTO13iRCODNtP0KC7£00*M,Ni.CKTIDOT036.04.04,30,60.103.833.0.0,0 0 

100 FORM.OT013iRrOONiPOICE7096.«,HI.CK».OOT»2.0, ISO.030 . 140 . 79.47.3 I .31 .<7.70. 143 

.233.13 

103 DOTO7.3,1.13,26.63,113.242,244.248,248.244,242 

IIO FO6M-0TQ 13 «RE0ONIPOKE7 312 »M.NiNEXTiD0T024I .233.240.224.192,128 

128 FORM-OTOi3iBE0ONiPOKE7328*M.NiNEXTiO0T024.24 .24,24 .24 .24.24.126.128.126. |£8, 

233,233 

123 O0T0233.233,126 

130 POOM-OTOi5 ! ptrtOMsPClKt7344*M.N«NEXTtDOTOO,O.O.O.6.0,24.24.24.0.0,0.0.0 O O 
^4C ^ORM-OTQ13«RCOONiPOKE73SO*M.Nif«XT.OOTA234.248.248.£40.224.224.192.192.224.2 

143 0OTO240.248.248.232.233 127,233.233.127.127 

130 FO»M-OTOt3«»EOONiPWE7376*M.N»NEXT«OOT031 ,31,13.7,13 .63,127,127,63.127.233 
40* *° PV '® T0,8, * C * Of<,P °* t 7332 * M ' N,NE * T,047 "233.234.232 .248,248,232.234 .234.232.2 

183 0OTO240.2e4.192.192.128.233.233,127.63.63,127.83 

170 FORM-PTO13* R£0DN> PO*E7408 *M.Ni KCXT•OO TO 13,7,13,13,7.3.3,3.1 

33*234** 1 ' ,eT013 «RE0ONIPOKE 7424•M.Ni FCXT «0OTO233.234.232 ,232,234 ,234,232 ,232.232.2 

103 0OT0234.232,234.233.233.233.233.127.63,63 

190 P0Rft-8T013tREO0NiP0KE744e*M.NiM-XTi0OT6l27. 127,63,63, 127 .233.233,127.187, 127 
.233 

200 FORM-OTO13lRERONlPOKE 7436♦M.NI FCX 7«OOTO118.128. 192.192.192.824.2^0,248.248.2 
203 00TO248.252 232.234 233.1.3.7.7.7.13 

210 PO»M-OT013lREODNtPOKE7472.M.NiHEKT.OOT013.63.63,:- i .31 .63.63.127 .233.233 
226 FO*H-0TOl3lR£0DNiPOKE7486*M,Ntf>CKTlO0T0£34.234.234 £ 34.124.92.28 ,20,24,24,6, 

B,0,0,0 

223 OOTOO.2.196.30,23,16,26 

£36 P0RM>0T013tPE0CiNtP0f'.E73O4*M.NirCXTi0OT0l46,84,e, 104,13£, 18.30,86 .04. 146* 

2«e RORM-0TOISIRE0DNiPOKE730B.M,m6CXTIO0T0l,130.66.4.64.30.0.0.100.130 * 10,|0,37 
.126.0.0 

230 FO6W-0TO 13iREODN»POKE7336*M. Nir-CXT10OTO67 .60.72,37.22,220,36,62.37, 123. |46,8 
233 OOTOO.o 

10 «S*2*R0N , P°KE7330*M.NINKMT*OOTOO,0,0.16,34,34,28.184,92,10.36,66.0,0 

e70 PORM-OTOl3iPEODNiPWe7360*M.Nl>CXT«OOTrtO.O.O,O, 16,36 .26 .24 .44,18.0.0 0,0 O O 
eeo * r ORM-eTO13«BEO0NiP0XE7384.M.NI8tXT«0OTOO.0.O.0.O.0.16.:6.C.0.O.0.0.c!0 0 

290 FORM-0 TO 13 * FE0DNIPOKE 7600•M.NIHEXT J t)0 T0C,0,0,0.0 n O.O.O.O.O, I .3,7,127 ^233 
300 TORM-OTOI*' iREOONiPOPC/e I&»M,NI7CMTIDOTOO .0.0 .0.0 0.0 .r>.eo.eo. 0€*.0.o 
310 POBM-OTO13*PEO0Nt POKE?63e*M.Ni >CXTID0T00.0.0.6 0.0.0,0.00.0,128,192'e£4.234 
.233 .0 

3,5 F ORM.0T»!SIRE<tfJNrPOKE7648.K,N!«:XT>ORTR0.0.0.«.e.66.6O.IE6.ai9.219 106 96 66 

#129.66 

326 FORM-7664TO7679IP0KEM. 10'FCKT 

330 FORM*IT08tP0XE63e*M.PSC<M106C *LO0D RON*.M,l>>IFCXTIPOKE633.I3IP0KE639.ISiPOK 
£190.9 


Program 2 


. 1 POXE ?6867,46•POKE 36869.240.POKE 368 78.1261P0KC36863.£06 t PR1NT ‘ ■•••aOROTTBR 

2 FO»M«0TO21« POPE61 64 *M 42 iPOKE 38084 *M.0 «NEMT •F0RM-8TQ4848TEP22iPOXE ?686 *M .42 
9 PO*E3e400pM.0lfCMTtFORM-0TO484STEP22lPOKEr781 Ni. 42 i POXE 3842 1 »M.OiNKXT 

4 pbint "iumnmmamm »u plyttpp —-r-rm~ *■ m.w och » 

3 PRIWiif» JUT PCD r '''ll>Mlfll6 T~T 5PEL-BSHIFT 

6 PRiNT-a«aari klprpoe oia : maw.m -m» ■ minuter och a*9«-aBMMt:-cr.uNDEj*. 


7 POK.E3686? .38U40IT633. t tRUNB 

8 POKE 36870 O i POPE36063,200«POKE36869.2331POKE36867,139 iPOKE36879.24 

9 KW» *00•:S0* *60 * 10-7898 s POKE36877,23310IMGt 14>i 38-20«S0-11 

10 PRINT*^EENTT TTTT TTTTTT T TOCE E EU T DOOOOOOOOOOOOOOOQE E E NDOOOboO CJOOOOOOOOOOEE 

12 8R INT*a.OOObOOOÖOOOOOOÖOOOOTONOOOOOOOObOOOtJOOOboOOKO?OOOOCIOOOOOOODOOOOOOOO 
14 PR »NT-^OOOOOOOOOOOOOOOOOOOOOEROOOOOOOOOOOOOOOOÖOOSENOOOOOOOOOOOOOOOOOOOO 
16 PR JNT*a.O|*aOOOOOOOroOÖOOOOO|*«DKCaiOGGGGGÖOGGOO&6GGG&H«:NDOO80*>O«OOOOOOOOOO 

voaoM 

IP PR tNT'CF®CBD*)OOO«3OOOOaOOe0*>OO»EEEEEEEEEF®CBO80OO*>OOOO«:EEEEEEEEEEE££F*) 
OOOOOD0E 

20 F0RM-3TO18iP0KE38398*M,6tF*XTiFORM-8T0IJ 

• 22 O' M‘* JNT RND» 1 > • 14 > IF0RN-8T0M» JFO<M>-G< N '0NDM< >N1MEN22 
24 KCKTiKCXTi I■-II14-38870 i X»1« POKE36863,23 * T 1•» *008000 * IGOSUB72 
*OOSUB70IGOSUB3OIGOSUB110IGOSUB90s608UB30iGOSU860’GOSUB80>G0T023 
30 B-P£EK< 197»IC-PIIF8O7THEN0-0-II1F0-7880THCKM-C 
32 1F8-30THEN0-0. 1 IIF0-7B97TXEN0-C 
34 POKCC.28IPOKEA,10»IFPECM 6*22 »-2B THEN500 
60 1 F PEEK< 633 • -0*M3O-8THEF6»ETURN 

62 |FD-0TMEFC^0iO>1IF-8 

63 IFG< 1 >-ETMCF64-0 > 0-01 J ■ 1 > 60-26 

64 C*r-22:P0KCC«22.28>IFE<7700THENO-0«RETURN 
63 1PE-I.THCN0-8IR-1 

66 POKEE ,S0iP-F-KiPOKEW,FiRET\IRN 

70 1FRKCX 1 »<• . 90NDH-OTHtP4»ETURN 

71 IFM-O0KCI-I3THENCH I)-INT<RM> t>'13>•7884■M-11 98-30 
,72 IFH >0 THEKP1 ■111-1*1:G< I) -G< l > • 7684 

74 |FO< 1 >-ETHEF4i>8l0>0i J-H90-28 

75 G< I>-G< I > »221 POKEG< I >-2£ ,28tP0KEG< I>,S8UF0( 1 > »7900 THEKW-0«J- 1 

76 RETURN 

80 IFJ-0TMEKWETURN 

81 IFG< I>>79OO0ND8B>3O0NOVB>OTHENGO8UB16O ' 

82 POKEO< I >-22,28«0-Oi POKEE ,28«POKE0.18* 1FQ< 1 > >?88©0NDO< I •< 7898 THE NG« l > >GC I»-22 

83 POKEG< 1 >. 21 IFORM-13T07STEJ»-. 12 « P0KE36878 .Ml NEXT« POKEG< I > .e2 i FORM-6 TOOSTEP - . 12 

84 POKE36878,MiKCXTlpOKE9< I >.281J-6*0< I>-O■S0-I|i RETURN 
. 90 IFRFCX IX . 9?0f©K -OTHENRE TUPN 

92 IFK -OTHEK*.>|KETr RNX t'«2>•13•7703i0-2IlIFL-7703THEN0-23 
94 IFK<4TWEK*-K>! tPOKEL,27-* iRETURN 

96 IFRK©< | X . PTHFh#»* INT< RNDi 1>«2>a2*2|I 1FRKCK 1 >< . 40THENP- -P 

98 1FPCEK< U »P)-280RL >P >7800THEF^OKEU,20 >U-U *P•POKEL,23 

99 IFE-LTHEKO-OtR-1 

100 IFL >7922THEM>OTO 130 
102 PCTURN 

I 10 lFR-OTWEr^>ETURN 
I12 POKEE.28 

I14^P0KE0.IO IPOKEU.211 FORM-13T078TEP-.12IPOKE36878. Ml F«XTlPOKEL.22•FORM-6T08STEP 

116 POKE388 70,M« FtXTiPOKEL.281R-0i K >0IL-OlRETURN 

130 POKE36878,13tF0RW-LT07923ST£P-liPOKEM*1.28'POKEM.23tFORN-230TO128STEP-23 

131 POKE36877,NIL-7923 * POKE38873.NlNEXTiKCXT 

132 FORM-UTO6O09iPOKEM*1,28 « POKEM.23IF0RN-236T0120STEP-20 iPOKE36877.N 

133 FOKE36873.NtNEXTtKCXTiPOKE36877.eiPOKE36B73.eiM«-M10M T1•,3.2»lS0-R10MTOCTIO 

134 G0T01 

160 POKE36877,O iPOKE36878,131VB-I 

^6^F°RM-G< 1 > TO796 18TEP-I IPOKEM* I .28 • P0KEM.381 POKE36873,9 121 -Ml FORPW- 1 T0381 FCXTl 
< **.»T* 79#Är079S ° * PO * CM ' > .28 iPOKCM.30iPOKE36873.818l -M*FORK61- l T0381 K«XT i KCXT i G 
164 POKC36877.235«POKE38873,0*RETURN 

500 KORM-22TO86STEP22iPOKE0*M-22,28»POKE0*M,10 1 FORN- 1 TOIOOIKCXT « KtXT 
303 POKE0*M-f»2.28 > POKC0»M. 2 I i FORN- 13T07STEP-. 1 t P0KE36B78 . Ni KCXT 

310 POKE0*M,22 * FPRN-7T06STEP-.00 iPOKE36878,NI FCXTlPOKE0*M,28 * 0-63000 iW-1IX-01OOT 



47 


























































Till VIC-64 


10 
20 
30 
40 
50 
100 
1 10 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
4 10 
420 


PR I NT " kiS 


F0RX s 49152T049415 
READA:PQKEX,A 
NEXTX 
PRI NT"*. 


0876169,0,170,157, 0,194,157,0 
DATA 195,157,0,196,232,208,244,133 
DATA251,169,194,133,252,169,49,133 
DATA253,169,133,133,254,169,13,32 
DATA210,255,169,70,32,210,255,165 
DATA253,32,210,255,169,61,32,210 
DATA255,163,63,32,210,255,32,207 
DATA255,72,160,0,165,254,145,251 
DATA104,32,133,192,201,13,240,17 
DATA201,95,208,2,169,13,145,251 
DATA32,133,192,32,207,255,76,68 
DATA192,230,253,165,253,41,1,208 
DATA 10,24,165,254,105,4,133,254 
DATA76,114,192,56,165,254,233,3 
DATA133,254,165,253,201,57,48,165 
DATA 120,169,144,141,20,3,169,192 
DATA 14 1,21,3,88,96,166,251,224 
DATA255,208,2,230,252,230,251,96 
DATA 165,197,197,254,240,58,201,3 
0ATA48,54,201,7,16,50,133,254 
OATA201,3,208,3,24,105,4,24 
OATA105,129,174,141,2,240,3,24 
DATA105,4,133,253,160,0,169,194 
OATA133,252,132,251,177,251,197,253 
DATA240,19,200,208,247,230,252,165 
DATA252,201,197,208,239,76,49,234 
DATA 133,254,76,49,234,200,208,8 
DATA230,252,165,252,201,197,240,242 
DATA 177,251,201,13,208,10,230,196 
DATA 166,198,157,119,2,76,213,192 
DATA201,0,240,222,201,133,48,7 
DATA201,141,16,3,76,49,234,32 
DATA210,255,76,213,192,0,0,0 


UNK T10NSTAN6ENTER" 


5TARTA MED SYS 49152" : 



funktionstangenter 




READY. 


ed hjälp av detta program kan du definiera upp 
dina funktionstangenter och få dem att utföra 
vilken funktion du vill. Programmet är avsett för 
Commodore 64. 

Var mycket noggrann när du matar in värdena i 
DATA-satserna. En felaktig siffra kan få systemet 
att krascha. Glöm inte att spara programmet innan 
du kör det första gången. När du kör det kommer texten på rad 
60 upp på skärmen. Om du nu skriver SYS49152 kommer 
programmet att starta. Du kommer att få följande meddelande: 
F1 =? Mata nu in de värde eller den sträng som du vill tilldela 
funktionstangent Fl och tryck RETURN. Programmet kommer 
nu att fortsätta och ge dig möjlighet att definiera alla funktions- 
tangenterna. Vill du inte ha någon definierad så tryck bara 
RETURN. 

Detta program har en del specialegenskaper vilka kommer 
att förenkla ditt programmerande. 

När du tilldelar funktionstangenternas värden kan du använda 
vänsterpil i stället för vagnretur. Om du trycker RUN/STOP 
RESTORE kommer funktionstangenterna att sättas ur funktion. 
SYS49152 gör att du sen kan tilldela dem nya värden. Om du 
har varit tvungen att använda RUN/STOP och RESTORE 
under normal programmering återställs funktionstangenternas 
värden av POKE788,144:POKE789,192. 

Dessa två kommandon måste stå på samma rad och matas 
in direkt. Detta program kommer inte att påverka dina övriga 


program men kommer att förenkla din programmering avsevärt. 

Här har du en rutin som kan, på ett enkelt sätt, MERGA 
samman dina program. Proceduren fungerar både på Commo¬ 
dore 64 och VIC-20. 

1 Lägg en tomkassett i bandspelaren och mata in kommandot: 
OPEN.,.,’,. "Programnamn": CMDlilST Tryck RECORO och 

2. När bandet stannat och det står READY på skärmen så mata 

in PRINT IrCLOSE 1 

3. När bandet har stannat kan du lägga undan det för framtida 
bruk. 

För att MERGA detta program med det du har i minnet, utför 
följande 

4 Lägg i kassetten som du tidigare sparat i steg 1 -3 och spola 
tillbaka den. 

5. Skriv POKE 19.1:0PEN1 

6. När det står READY på skärmen, rensa skärmen med SHIFT 
HOME 

7. Mata ner markören exakt tre steg. 

8. Mata in PRINT CHRS[19):P0KE 198.1:P0KE 153.1 

9. När bandet stannar kommer du att få ett felmeddelande. 
Strunta i detta och skriv CL0SE1 

10. Nu är du klar. Kontrollera och se hur programmen är 
sammanfogade 
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Tips till VIC 64 



detta num¬ 
mer av Allt 
om Hemdato¬ 
rer finns en 
listningpåett 
programsom 
ordnar upp diskbiblioteket i 
bokstavsordning. Man kan välja 
mellan att sortera efter filgrupp 
eller bara i bokstavsordning. 
Med filgrupp menas att filen 
antingen kan vara program, 
sekvensiell, relativ eller en User 
fil. När programmet delat upp 
filerna efter filtyp, sorterar den 
alla filerna i en speciell filtyp i 
.bokstavsordning. 



Gör så här när du skall använda 
programmet. 

1. Sätt in den disk du vill 
sortera på i disk-driven och 
tryck sedan på RETURN-tan- 
genten. 


2. Programmet listar sedan 
upp disk-biblioteket. Besvara 
säkerhetsfrågan FORTSÄTT A 
med J, är det inte rätt diskett 
så skriv N. 

3. Datorn frågar nu om den 
skall sortera disketten i filgrup¬ 
per, tryck J, i så fall annars N. 

4. Datorn skriver nu SORTE¬ 
RAR... Tiden det tar att sortera 
är beroende på hur många 
filer det är. 

5. När datorn är klar med 
sorteringen börjar den skriva 
ut filerna på disken och på 
skärmen. 

6. Nu är filerna snyggt sorterade 
på disken. Kontrollera genom 
att ladda biblioteket. 

Poke-koder 

Så långt programmet disk¬ 
sortering. Jag tänker nu ta 
upp en del trevliga och otrevliga 
POKE-koder. Dessa kan vara 
bra att använda om man t.ex. 
vill skydda sitt program mot 
kopiering eller kanske stänga 


av Run stop restore. 

Jag börjar med att tala om hur 
du skall bära dig åt för att 
stänga av Run -stop / RESTORE 
tangenterna. Skriv bara POKE 
808,225. För att sätta på dem 
igen, skriv POKE 808,237. Det 
finns dock ett litet problem när 
man gör det här, det är att den 
inbyggda klockan inte fungerar 
som den skall. Samma problem 
uppstår om SIMONS' BASIC 
är instoppad i datorn. Om man 
endast vill stänga av Run- 
stop så skriver man POKE 
788,52 POKE 788,49 för att 
återställa. 

Ett sätt att listskydda ett prog¬ 
ram är att skriva POKE 
2048,255 när man knappat in 
sitt program. Vill man dessutom 
se till så att det inte går att 
spara programmet så skriver 
man POKE 819,0. LOAD stän¬ 
ger man av genom att skriva 
POKE 817,0. Experimentera 
med dessa POKE-koder och 
du hittar säkert någon som 
blir din favorit. 


Sortera dma disketter 

- -Ptsosvb 10-10 :\z *< c )-:t 690 i-f £.»<*' i ♦m><sK* / . i > 30 to 7 10 


1 10 fokc 53290,13 t PC. c 33291 , l«!pr :r. t “3" 

130 pr ir.^chrf' 14> 

170 crlnt "SEMBat-t i dicKcn i drive O. RETURM - fort 

MO 3<?tz*t Mz*< 'chrf'. 13>sotc M0 

160 dn-8;d-0?c2-2tcc-15t t-18t5*0ibF - Ml 

170 epencc än c:,•lO•:josub1013 

190 open c2 .än ,c2, "tt" ‘ 3 &zub1010 

210 Fr irvtltcc , "u 1 • "c2? ä : t !z tscsub 1010 

220 pr tntWcc , "fc -p t " c 2 ? b p 

230 idf‘" " :n“20: gesub 10*0: id*-z* 

2*0 f- tnt "El? isK : "id*“ " 

210 dimzV.' 19?, ft*' 192? , ts *' 192> ,nf *' 192?, fet' 19Z ? ,s« 
320 d i mt *' * > : t *C 1 >-"acq"!t*^ 2>-"pr3":t*< 2>-“ucr *: tff 
330 fer i-lto30t:0f-:et*chr*' 0)?nci:t 
360 s-1 
370 c-1 

380 Fr intWcc , *ul s "c2 .* d 1 t; s : gcaub 10 10 : bF “ 1 

390 Fr in-tttcc , "b-p t B ;c2?bF tsosub 11s >-a 

'lOO pr intWcc, "b-p *c2.*bp tgosub 1110Mt~a 

* 1 O if f -t -eorf t - 1 ESthcr. b? -bp *31 : so t o300 

*30 i-f f t< 128thcnpr int "3 F XL FEL M sscto999 

*20 f ttc € >-s.» 

**0 n-21 gosv;1 10*0 :tc*< c ? ~zf 
*30 n-IStgcaub 19i0inf *< z >-z* 

*60 r-11tgosub10*0?fc*<c>-z* 

'ISO pr int , * *nft' c )* : "ta*<ft-128? 

*90 bp-br+2:c-c♦1 
300 if bp< 236soto*00 

310 z M >233tfccns ~zY.', z ? t sot o380 

320 gozublMP 

330 c-c-l?ife-0ac*o730 

5*0 pr int "Sorter a pa fil typ 7 ' J /n ? " 

350 jetztsft*~z*: M 3oto3S0 
560 ifz*'>"n"soto330 
390 pr int "JForterar ..." 

390 f or i-ltoe tKM8 

600 f or J -lto 16 t if mid*< nf *' i > , j , 1 >-chr *' 160 ?thcnK - j -1 
610 nextJtsKtt i >Mef t*' nf *' \ ) ,k ) 

620 i f f t *-"•/ "thensK*' i?-ft*< i>+£K*^ i? 

630 nexti tm~c 

6*0 m*-int( 10/2> : ifm-0aoto7*0 
630 K-e-mtj -O 
660 if J >Ksoto6*0 
670 i«*J 

690 ifi<03oto7O0 


*'. 192? 
^-'rcl 1 


tj-16 


700 

710 

711 

712 

713 
7 M 
720 
7*0 
730 
760 
770 
790 
790 
900 
320 
930 
9*0 
930 
960 
970 
990 
900 
912 
920 
370 

o^n 

990 

960 
970 
990 
990 
999 
1010 
1020 
10*0 
1030 
1060 
1 1 10 
1 120 
1 1*0 
1 150 
1 160 
1 170 

- cady 


j-J *1 igotc660 

a*-ft*< i>tft*' »>-ft*< i+m?Mt*t t+m?»a* 
at-ts S'. lJftst' t?r-tsr. i+m)ft:r i +m> ~a* 
at-nft*: i > :nf *< i ?-nf *< i +m>: r.f *'. i *-m> 
a*-fcr i ' Mc** i ?-fe*' : +m? Mc*', i +rr.?-a* 
2 >~sK*' Mm)-a* 

i-i-rrrrsto690 

print“JCKrlvcr ... t ■ i d *" " 
z*-chr *' O? ♦chrft 233? 
s -1; r -! 

p-irtUcc ."ult "c2Jd?t • z tgosub 10 10 

bp-2 

ifn 'cgcto999 
ifbp< 23630to9*0 

print*cc . "u2:"c2:d;ttgcaut1013 

z^zl'.' z ) f 3 c t o 770 

printncc,"b-p? ,, *c2*bF 

Frirt," “n^t^n?" ! "t ascC f t *: n ! ? - 122 

Fr intftc2 ,<tr r. ? *t z%' n ' Mc*( n >f 

bF -bp +321 n ~r -*• 1 : 3 c t o 792 

ift*F v 23530tc922 

prir.t9cc,"fc p?"?c2?bp 

pr ir.t M i2 ,:f?t,* 

t?-fcp+32 1 30 1 c 990 

t r -0 *f- intftcc , "b -f ? "?c2.*bp 

pr inttc2,z*r 

rr intUcc,"u2;•c2?d?t rz tsosub1010 
z*-l ef t*< z0*,2? 
z^zV/ z > * if : “2553 o t o 999 
print#cc,*ulT"c 2 ?d?t?s: 3 osub 1000 
bp-2! 3 cto9O0 
clccc:2:;lc:cccfend 
inptjtt*cc ,er. .err*,ct ,cs : if cn~Othenreturn 
Frint"3 DISK FEL “cn;cm*;et;est 30 1o999 

z *- " " 

fori-ltontsosubll 10 

r*-z* + a*:r.ei;t treturn 

se t t*c 2 , a*r i fa*-" "thenaf-chrtt 0 ? 

- ~acc'. a*):bF-bp + l treturn 

pr i-st "SFcrtsatta 0 <J*n>" 

3 c t z * t if z*-"r. " 30 1 c999 
ifz*< >"j "3 o t o 1150 

pr int "B r.Teturn 
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Katt och Råtta är ett grafiskt äventyr 
för ZX Spectrum. Spelet går ut på att 
ta sig genom 8 labyrinter och 
samtidigt undgå att bli uppäten av 
katten. Du ser inte de väggar som 
omger dig. I stället får du reda på hur 
många,väggarna är. 

Varje gång du gnager dig genom en 
vägg kostar det en styrkepoäng och 
när styrkan når noll dör du av ren 
utmattning. 

Dessutom finns det en katt som följer 
dig i spåren. Han får inte fånga dig. 
Här och var i labyrinten finns det ost. 


När du står bredvid den lyser ordet 
''OST" på skärmen. Dessutom finns 
det en skatt på varje nivå. Du måste 
hämta skatten för att överhuvudtaget 
få poäng för den nivå du befinner dig 
på. 

Skärmen är uppdelad i två delar. På 
vänster sida ser du labyrinten med 
din och kattens positioner. Dessutom 
ser du var du varit. 

På höger sida ser du statusvärden. 
Dessa är Styrka, Väggar, Avstånd, 
Nivå och Poäng. Styrka är ett mått på 
hur många väggar som omger dig. 


Det gäller att försöka undvika 
väggarna eftersom styrkan används 
för att ge dig poäng efter varje nivå. 
Avståndet anger avstånd till skatten, 
eller om du har hämtat det avståndet 
till den plats där du hämtade skatten. 
Du vet aldrig var skatten är belägen, 
bara avståndet, så det det gäller att 
ringa in den. Nivå och Poäng är 
självklara. Det finns 8 nivåer. För 
varje nivå blir katten snabbare och 
väggarna fler. 

Antalet ostar och din styrka ökar 
också för varje nivå. För att få plocka 
upp ostar och skatter behöver du 
bara befinna dig på rätt ruta. 

Katt och råtta är det hitills längsta 
programmet i denna serien. Det 
kommer att ta dig en stund att 
knacka in. Vår förhoppning är att det 
också ska fungera som en skola i hur 
man kan lägga upp sina egna spel. 
För att snabba upp det hela, har vi 
lagt två subrutiner i början av 
programmet. De ligger på rad 40-70 
och 80-180 Labyrinten sparas i två 
strängvariabler: A$ och BS används 
vid repriskörningen av varje nivå och 
innehåller en oförändrad labyrint. A£ 





Vi fortsätter vår serie Spectrumspel. Denna gång är det 
råttan från förra numret som har råkat illa ut. ”IVImmm! Vad 
är det här.” tänkte råttan. ”En hel labyrint fylld med ost. 
Trodde dom verkligen att en labyrint kan stoppa mina vassa 
tänder. Se upp nu kommer jag.” Med ett glatt hojtande 
kastade sig Råttan in i labyrinten. Vad han inte vet är att man 
blir trött av att gnaga och någonstans finns en katt som 
lurpassar på honom. 

<i»- 





















förändras i och med att du gnager dig 
genom väggarna. På vissa rader har 
jag använt grafiska tecken. Raderna 
är: 110, 150, 270, 280, 440, 600, 610, 
1000. Här skall bokstäverna skrivas 
in i grafisk mod. REM satsen på rad 
1210 är bara en checklista över 
variablerna och utrymmer och 
behöver inte skrivas in. 

Efter Katt och Råtta tar vi en liten 
paus i serien som började i nummer 
1. Vi kommer att presentera spel för 
ZX Spectrum i fortsättningen också, 
men just nu står fantasin på nolläge 
beträffande gnurglor, Gammelostar 
och andra konstiga saker. På 
återseende! 


RÄTTELSE! 

Det dök upp några fel i förra numrets 
spel "Gammelosten slår till igen” 
Programmet som matar in grafiken 
ska ha följande rader i stället för de 
som stod i förra numret. 

20 INPUT B 
50 LET L=L+1 
Annars var det rätt. 



10 DEF FN R(X.Y)-INT (RNDtXXA 
20 GO SUB 1050 
30 GO TO 0190 
♦O REN DISPLAY 

50 PRINT INK 5» PAPER 1*AT 2.29*- -,AT 2,30*ST|AT 9.30*INT <L/30> 

60 PRINT INK 3| PAPER l*AT 13.28|P 
70 RETURN 
00 REN KATTEN 

90 IF RND'L/1000 OR A<10 THEN RETURN 
100 FOR V-K TO K-M 
110 PRINT AT 0<V>,W(V>»“c“ 

120 IF 0(V)-X AND W(V> WTHEN PRINT AT X-M. 4, -KATTEN AT UPP DIG** t FOR I-i TO 10 
Oi NEXT Ii GO SUB 0970» GO TO 1130 
130 PRINT PAPER 4»AT 0<V>.W<V>»“ " 

140 NEXT V 

150 PRINT AT QtV-l>,W(V-1>» 

160 LET K-V-l 

170 IF RND>.5 THEN GO TO 0100 

10O RETURN 

190 REN HUVUDLOOP 

200 GO SUB 0030 

210 GO SUB 0380 

220 GO SUB 0550 

230 GO SUB 0660 

240 GO SUB 0050 

230 PRINT PAPER 3|AT X,V;" - 

260 LET X-X* (SM*“6“) - (SM-“7“ > i LET Y-V+ <SM-"B-) - <SM-"3“ ) 

270 IF AM (XM.Y+1 THEN LET ST-ST-li LET AM (X«-l. Y*1)«- “: GO SUB 0040: BEEP 

.l.-20i IF ST<1 THEN GO SUB 0960i GO TO 1130 

200 IF A* < X♦1, Y-1>-“a" THEN LET ST-ST-M./23* GO SUB 0040* BEEP .1.30* LET AM(X-1 
. Y—1)—" " 


290 IF SM-"" OR RND<L/1000 THEN GO SUB 0080 

300 IF X<1 THEN LET X-i 

310 IF Y<l THEN LET V-l 

320 IF X>20 THEN LET X-20 

330 IF Y>20 THEN LET Y-20 

340 PRINT AT X,Y| PAPER 6| INK I *“b" 

330 IF SM<>““ THEN LET Q<A>-Xs LET W(A)-Y: LET A-A*l* IF A>200 THEN DIN 0(400)* 
DIN M(400) 

360 LET S-0 
370 LET EM-” ** 

300 LET NM-” 

390 LET EM=£M*AM(X-*-l. Y*2) 

400 LET EM-EM*AM(X*2, Y<-1) 

410 LET EM-EM+AM(X.Y«-1> 

420 LET EM-EM*AM(X—1.Y) 

430 FOR 1-1 TO 41 IF EM<I><>“ - THEN LET S-S-l 
440 IF E4(I)-1a“ THEN LET NM-"OST" 

450 NEXT I 

460 PRINT AT 7.30» FLASH SGN S|S|AT 14,23» FLASH 0*NM 
470 IF SM f >“" THEN BEEP .0O1.SMS+40 
480 IF X-20 AND Y-10 THEN GO TO 0730 

490 LET BXl-BX-X* LET BY1-BY-Y* LET BS=SOR <BX1*BX1»BY1tBYl) 

500 PRINT PAPER 1* INK 3»AT 11.30»“ “»AT 11.30»INT BS 

310 IF BS-0 AND NOT BJ THEN LET BJ-l* FOR 1-0 TO 36 STEP 0: BEEP .1.1* NEXT I* 


LABYRINTEN 

“* NEXT I 
LET AM(22 >-AM <1) 


LET BJ-lt 

320 IF INKEYM-"- THEN GO SUB 0080 
530 LET SM-INKEYM: GO TO 0230 
340 STOP 

330 REM RITA LABYRINTEN 

560 FOR 1-1 TO 22* PRINT PAPER 2» INK 0»AT I-1.0»BM<I>: NEXT 
570 RETURN 

380 REM SKAPA LABYRINT 
390 REM SKAPA RAMEN OCH SUDDA 
600 FOR 1-2 TO 21* LET AM(l>«" 

610 LET AM < 1) » "dddddddddddddddddddddd " 

620 LET A*(22.ll)-“ “ 

630 LET A*<2.12)-“ “ 

640 FOR 1-1 TO 22* LET B*(I)-A*(I)* NEXT I 
650 RETURN 

660 REN SK APA LABYRINTEN 

©ro roN x-i ro li serr .001.49* uct a*<fn Nti 4 . 2 ».rN r< 19 ,2») -"j£": next x 
680 LET BX-FN R(19,2)l LET BY-FN R(19.2) 

690 LET AM <2,12)-“ - 
700 FOR I-i TO L/30 

710 LET AM<FN R(19,2).FN R(19.2))»“a“: NEXT I 

720 FOR I-l TO 22* LET BM(I)-A»(I )1 NEXT I 

730 LET BM (BXM.BYM 

740 RETURN 

730 REN NY NIVA 

760 GO SUB 0970 

770 IF BJ THEN LET P-P«*L/30»ST 

780 LET L-L+30* LET BJ-0 

790 IF L>400 THEN GO TO 1130 

BOO LET X-l* LET Y-ll» LET A-l* LET ST-L/23-8: LET K-l 
810 LET S*-“6“ 

820 GO SUB 0040 
830 GO TO 0210 
840 RETURN 
050 REM INITSIERING 

860 DIM A* <22.22)* DIM 0(200)1 DIM W(200>* DIN B»(22.22) 

870 LET X-l* LET Y-ll: LET SM-"6"i LET A-l: LET L-30 

800 LET ST-10 

890 LET P-O: LET K-l 

900 LET BJ-0 

910 RANDOM IZE 

920 BORDER 1: PAPER 3* CLS 

930 PRINT PAPER 1» INK 6»AT 2,23»"STYRKA"»AT 4,23*AT 7.23»“VAGGAR"jAT 11,23*"AV 
STAND"»AT 9.23»“NIVA" 

Q 40 PRINT AT 13,23» PAPER 1» INK 6»"FOANG" 

950 RETURN 

960 PRINT Mit AT 0.0»"DU DOG AV UTMATTNING": GO TO 0970 
970 REM REPRIS 
*»80 GO SUB 0550 
990 FOR I-l TO A-l 

1000 PRINT AT 0(I).M(I>» PAPER 3* INK 7*“Jj." 

1010 BEEP .1.I/A460-30 

1020 PRINT AT 0<I>.N<I>» PAPER 3* INK. 0*" - 
1030 NEXT I 
1040 RETURN 
1030 REM GRAFIK 

1060 FOR I—USR "A" TO USR "A"*31 
1070 READ A: POKE I.A: NEXT I 
1080 DATA 7,11.33.77,244.140.132,224 
1090 DATA 8.16.16.124.56.124.36.16 
1100 DATA 24.60,24.60,126.126.126.60 
1110 DATA 231,231.231.0.126.126.126.0 
1120 RETURN 

1130 GO SUB 0600: 60 SUB 0550 

1140 PRINT AT 10,3»"DU KLARADE DIG UT“»AT 12,3 »"MED *:P»" POÄNG" 

1150 PRINT AT 21,0*"VILL DU SPELA IGEN J/N » 

1160 IF INKEY4-"n“ OR INKEY*=“N" THEN STOP 
1170 IF INKEYM-"j" OR INKEY»-“J» THEN RUN 
1180 GO TO 1160 

1190 CLEAR : SAVE "KATT6RATTA" LINE 0010 
1200 STOP 

1210 REM CA 7.3 KB VARIABELLISTA AM() BM 

() SM NM EM I A X Y L P K S ST BJ 


BX BY BX1 BY 1 
























E n SORD Hacker har 
M5 Creative Compu¬ 
ter, hemdatorn från 
SORD, som ständig föl¬ 
jeslagare. 

Är du ny i garnet - 
börja med M5-spelen 
och utmana Wilander i 
tennis, sök rätt på den 
dolda skatten, slå till¬ 
baka inkräktare från 
rymden och mycket 
mer. M5-spelen låter 
dig nosa på datatekni¬ 
ken på ett lekfullt sätt. 

När du börjar känna 
dig hemtam vid tan¬ 
gentbordet och TV- 
skärmen går du vidare 
med BASIC-I och lär dig 
elementär programme¬ 
ring. Nu kan du också 
göra egna enklare pro¬ 
gram. 

I och med din nya da¬ 
tamognad, börjar SORD 
Hackern i dig sticka upp 
huvudet. Du vill snabbt 
vidare. 

M5 hänger ledigt 
med. Du som vill syssla 
med avancerad pro¬ 
grammering tar till 
BASIC-F, du som känner 
för att göra animerade 
filmer med ljud och färg 
använder BASIC-G och 
du som vill bearbeta 
information kör med 
M5 FALC. 

Bli en SORD Hacker du 
också! 


Faktaruta: 

CPU: Z80A (3,58 Mhz) 

MINNE: ROM 8 Kbyte expander- 
bart till 16 Kbyte RAM 20 Kbyte 
expanderbart med 32 Kbyte 
TANGENTBORD: 55 tangenter, 
64 grafiska symboler, 28 förpro¬ 
grammerade basic-kommandon 
BILDSKÄRM: text 40 tecken x 
24 rader, grafik 256 tecken x 
192 rader, 16 färger, 32 sprites 
LJUD: 3 tonkanaler, 1 bruskanal, 
5 oktaver, 7 tempon, 8 ljud¬ 
typer, 7 staccaton, 15 volymer, 
programmerbar envelop 
VIKT,: 0,8 kg 

STORLEK: 262x185x36 mm 



BLI EN SORD 
HACKER! 



HEMDATORN FÖR HJÄRTA OCH HJÄRNA 


SffiC/Scandinavian Micro Computer AB — Ett företag i Salén t Wicander Gruppen 
Marieholmsgatan 15 415 02 Göteborg Tel. 031-80 41 00 
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STORST SORTIMENT OCH BILLIGAST 


SPECTRUM 


Spectrum 

1 695 

- 16K 

Spectrum 

2 180 

48K 

Keyboard 

725 

- 

Light Pen 

310 

- 

Printer Interf. 

745 

- 

Upgrade Kit 

475 

- 32K 

Zonx 

545 


ZX Printer 

750 


Printer Papper 

35 


Joysticks 

fr. 340 

- 

Spel 

3uStrategy 

105 

16K 

3DTanx 

75 

- 16K 

3DTunnel 

69 

• 16K 

AH Dlddums 

77 

16K 

Androids 

84 

- 16K 

Aquaplane 

105 

48 K 

Arcadia 

77 

- 16K 

Astro Blaster 

69 

16K 

Blind Alley 

74 

16K 

Centi-Bug 

75 

16K 

Centipede 

75 

16K 

Centropods 

84 

16K 

Chess 

126 

48K 

Chess Player 

98 

48K 

Chess theTurk 

112 

48K 

Cookie 

84 

16K 

Cruising on Br 

74 

16K 

Cyber Rats 

89 

16K 

Dictator 

75 

48K 

Escape 

79 

16K 

EscapeMCP 

84 

16K 

ETX 

90 

16K 

Everest Ascent 

89 

48K 

Firebirds 

87 

16K 

FlightSim. 

126 

48K 

Frenzy 

69 

16K 

Frogger 

84 

16K 

Frult Machine 

75: 

48K 

Galaxian 

75: 

16K 

Galaxy Attack 

84. 

16K 

Goldmine 

75: 

16K 

Ground Attack 

89: 

16K 

Hard Cheese 

75: 

16K 

Heathrow 

120: 

16K 

Hobbit 

205: 

48K 

HoraceG.Skiing 

96: 

16K 

Horace + Spiders 

96: 

16K 

Hungry Horace 

96: 

16K 

Invaders 

75: 

16K 

Jaws 

75: 

16K 

Jet Pac 

84: 

16K 

JohnnyReb 

84: 

48K 

Joystick Adapt 

105 


Jumpin Jack 

77. 

16K 

Knotin3D 

98 

48K 

Manic Miner 

96: 

48K 

Maziacs 

75: 

48K 

Megapede 

87: 

16K 

Meteor Storm 

69 

16K 

Meteroids 

75: 

16K 

Mined Out 

69: 

48K 

MolarMaul 

77: 

16K 

MonstinHell 

87 

16K 

Muncher 

89: 

16K 

NightFlight 

87: 

16K 

Orbiter 

89 

16K 

Ostron 

87: 

16K 

OvertheSpec 

84 

16K 

Paras 

105: 

48K 

Penetrator 

98 

48K 

Phantasia 

84 

48K 

Planetoids 

84: 

16K 

Pssst 

84 

16K 

Ouackers 

84: 

16K 

RaceFun 

84: 

48K 

Redwed 

84 

48K 

Repulsar 

87: 

16K 

RoadToad 

75: 

16K 

Robon 

87: 

16K 

Samurai Warrior 

84 

16K 

Schizoids 

77:- 

16K 

Shipof theL 

89 

48K 

SlipperySid 

89- 

16K 

SmugglersCove 

105: 

48K 

SoundFx 

75- 

16K 

Space Intruders 

75:- 

16K 

Space Raiders 

84- 

16K 

Spawnof Evil 

75:- 

16K 

Speakeasy 

75:- 

48K 

Spectral Inv. 

69: 

16K 

Spectres 

84 

16K 

Styx 

84 • 

16K 

Super Spy 

89:- 

48K 

Swordfight... 

84. 

16K 

Terror Daktil 

98- 

48K 

The Areadian 

79: 

16K 


TheCastle 

98: 16K 

TimeGate 

97 48K 

Trader 

145: 48K 

Transyl Tower 

89 48K 

TranzAm 

84 16K 

Tyrantof Ath. 

87 16K 

Velnors Lair 

105. 48K 

Warlord 

87: 48K 

Xadom 

105: 48K 

ZlpZap 

77: 48K 

Zzoom 

77:- 48K 

Nyttoprogram 


Adress Manager 

145: 16K 

AM-Edizon 

149: 

AM-ZXfile 

99: 

AMZXmon 

119: 

AM ZXsp 

109: 

Astron 

145: 16K 

Database 

145:- 48K 

Devpac 

215: 16K 

Di st ron 

75:- 16K 

Easyspeak 

69: 48K 

M/C Test Tool 

145:- 16K 

Master Toolkit 

145: 16K 

Melbourne Draw 

126:- 48K 

Screen Editor 

145 16K 

Slowloader 

145: 16K 

Spreadsheet 

145:- 48K 

Use and Learn 

145:- 16K 

VUCalc 

145: 16K 

VUFile 

145: 16K 

Word Processor 

145: 48K 

Wordprocessor 

83: 48K 

Zxed Toolkit 

98: 16K 

Böcker 


20 Simple Elec 

112:- 

60Gamesand Ap. 

69:- 

Delving Deeper 

126: 

M/L for Beg 

109- 

OvertheSpec 

109- 

Prog YourSpe 

112:- 

ROMDisass 

145:- 

Spe. Adventures 

98: 

Spe M/CApplic 

112:- 

TheWorking Spe. 

98 

Understanding 

129: 

ATARI 


A.E. 

449: DIS 

Apple Panic 

369 DIS 

Arena 3000 

395: KAS 

Arena 3000 

395: DIS 

Choplifter 

395: DIS 

Choplifter 

449- CAR 

Dav Mid. Magic 

395: DIS 

Dunzhin 

495: DIS 

Dunzhin 

495: KAS 

Kaiv 

495: DIS 

Kaiv 

495 KAS 

Lucifers Realm 

349: DIS 

Matchboxers 

369: DIS 

Paradise Thr. 

295: KAS 

Prof. Blackiack 

795- DIS 

Sentinel 

395: KAS 

Sentinel 

395- DIS 

Serpentine 

370:- DIS 

Serpentine 

395: CAR 

Sky Blazer 

395: DIS 

The Institute 

295: KAS 

The Institute 

345: DIS 

DRAGON 



Scarfman 112:- 

Space Monopoly 1 12:- 

SpaceWar 112:- 

Ultimate 1 12:- 

Williamsburg 112:- 

Dragbug 229 

Telewriter 695- 

Böcker 

DynamicGames 75:- 

EntertheDra 89: 

Makingthe. 145:- 

ORIC 

3DMaze 109 

50games 139 

Amazea 119:- 

CandyFloss 109:- 

Chess 139. 

GamesComp. 109 

Grail 119:- 

OricFhght 109:- 

Oric Multigame 109 

Zodiac 139:- 

Bok 

Meteoric Progr 89- 


COMMODORE 64 


Co mm odo re 64 
1541 Floppy 
Joystick 
Printer 
Adventure 1 
Areadia 

Attack Mut Cam 
Avenger 
Centropods 
Choplifter 
Clowns 
Curse of Ra 
Curse of Ra 
Cyclons 64 
Dungeon A Drag 
Gorf 

Gortek + Micro 
Grand Master 
Graphics Editor 
Grtdrunner 
Hover Bovver 
Hungry Horace 
Jupiter Lander 
Kaktus 
Kickman 
Laser Zon 
Lazarian 
Le Mans 
Mangrove 
Martian Raider 
Matrix 
Monopole 
Motor Mania 
Music Comp. 
Omega Race 
Rat Race 
Renaissance 
Robbers Lost T, 
Seafox 
Seawolf 
Tank Atak 
Temple of Apsh. 
Upper R. of Aps 
Upper R of Aps 
Wallstreet 


04 

3 395 
3395- 
Fr. 89 - 
2 695 
KAS 

77 


116 

KAS 

229 

CAR 

8-t 

KAS 

375 

CAR 

249 

CAR 

179 

DIS 

179 

CAR 

84 

KAS 

525 

DIS 

266 

CAR 

210 

KAS 

238 

KAS 

84 

KAS 

116 

KAS 

116 

KAS 

84 

KAS 

229 

CAR 

126 

KAS 

229 

CAR 

116 

KAS 

266 

CAR 

168 

CAR 

126 

KAS 

266 

DIS 

116 

KAS 

84 

KAS 

112 

KAS 

268 

CAR 

268 

CAR 

187 

CAR 

112 

KAS 

525 

DIS 

345 

CAR 

279 

CAR 

126 

KAS 

349 

DIS 

179 

CAR 

179 

DIS 

575 

DIS 


Alcatrazll 

112: 

Defense 

112: 

DonkeyKIng 

112: 

Escape 

112: 

Flipper 

112: 

Invaders 

112: 

Jerusalem 

112: 

Katerpillar 

112: 

Mansion 

112: 

Planet Invas 

112: 


Nyttoprogram 


6502 Pds 

285: KAS 

Assembler 

345 DIS 

Easy Mail 

269 DIS 

Easy Script 

695: DIS 

Easy Script 64 

695: CAR 

Hesmon 

339: CAR 

Heswriter 

495 CAR 

Infomast 

1295- DIS 


Använd vanlig bandspelare med remotekontroll till 
din VIC-20, VIC-64. 155:— 

Nya program och tillbehör kommer ständigt in. Egen 
serviceverkstad, snabba reparationer, fasta service¬ 
priser . 100:—plus reservdelar. 

Återförsäljare antages. 


Screen Editor 

240- DIS 

Simons Basic 

575- CAR 

Böcker 

Bus.AppI 

98: 

Com.64 Adventur. 

98 

First of Pet 

143: 

GamesBook 

99 

Graphic Art 

98 

M/C Master 

98: 

M/L for Beg 

169: 

Matematics 

98 

Prog Ref Guide 

265: 

Prog thePet 

295 

TheWorking Com 

98 

Usingthe64 

149 


VIC-20 

VIC-20 
27/32K RAM 
Disk Drive 
Eprom 
Joystick 
Printer 

Spel 

Abductor 
Alien Blitz 
Amok 

Andes Attack 

Blitzkrieg 

Bonzo 

Buspree 

Catcha Snatcha 

Cavern 

Chess 

Cosmic Crunche 
Cyclons 
Defender on Tri 
Frogrun 
Gorf 

Gridrunner 

Harvester 

Hopper 

Jetpac 

Jupiter Lander 
Kamikaze 
Laserzone 
Martian Raider 
Martian Raider 
Math Hurdler 
Matrix 

Meta: Liarnas 
Mmd Twister 
Moons of Jup 
Omega Race 
Pirate Cove 
Pit 

Pixel Power 
Rat Race 
Sea Invasion 
Space Attack 
Space Storm 
Starquest 
Starwars 
Subspace Strik. 
Supersmash 
Trader 
Traxx 
VIC Trap 
Whitch Way 
Zoks Kmgdom 


Böcker 

50outstandmg 
Getting Acquain. 
Innov Comp 
M/L for Beg. 

Zap! Pow' Boom! 


1 695 


695 

CAR 

3 195 :- 


459:- 

CAR 

89- 


2 695 



69 

112: 16K 

98 

84; 8K 

49 OEX 

112:- 8K 

169: 

77:- OEX 

84: OEX 

98: 16K 

295: CAR 

98: 3K 

98 

84 OEX 

289 CAR 

78- OEX 

112:- OEX 

69: OEX 

84 8K 

239 CAR 

112- 3K 

87:- 8K 

98 OEX 

329 CAR 

112:- OEX 

98 8K 

89: OEX 

98: OEX 

98 OEX 

269 CAR 

289 CAR 

112 :- 

112- 8K 

189: CAR 

98 OEX 

98 OEX 

69 OEX 

112- 16K 

112 :- 

112:- 16K 

189 CAR 

139- 16K 

87- 8K 

112:- OEX 

169: 8K 

112:- 16K 


119: KAS 

145: 16K 


98 

89 

119 

169 

129 


Nyttoprogram 

Character Set 
Rabbit Wrlter 


+ massor av spel och tillbehör 
till ZX-81. 
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inclair Spectrum har något riktigt trevligt nämligen 
Användar-Definerbar-Grafik eller ADG som för¬ 
kortning. Där finns 21 tecken som vi kan definiera 
upp efter eget tycke och smak. Det är utmärkt men 
ibland räcker inte dessa till. 

Jag hade i denna artikel tänkt att gå igenom hur 
man skulle kunna få "A" att se ut som en liten fisk 
eller kanske hur du på ett smidigare sätt kan lägga in Å Ä ö i din 
dator. 

Om du vet hur man använder ADG så har du vunnit mycket i 
förståelse av mitt resonemang. Men låt oss för alla er som inte 
exakt vet hur ADG fungerar gå igenom hur tecknen är 
uppbyggda. 

Varje tecken består av en matris med 8 rader och 8 
kolumner. I varje rad kan en punkt vara släckt eller tänd. Om vi 
låter en tänd punkt motsvaras av en etta och en släckt punkt av 
en nolla så ser vi lätt att varje matrisrad kan lagras i en byte. 8 
rader bildar ett tecken, därför kan varje tecken lagras i 8 bytes. 

Vi har 96 ickegrafiska-tecken i datorn, (kontrollräkna om du 
inte tror mig) 96x8768. Alltså finns det någonstans i Rommet 
768 bytes som talar om för datorn hur tecknen skall se ut. Men 
hur vet datorn var den skall finna dess 768 bytes? 

Om du slår upp systemvariablerna i din manual så finner du 
där en variabel som heter CHARS adress 23606 och 23607. 
Den har en liten egenhet. Den har nämligen ett värde som alltid 
är 256 lägre än den adress där datorn läser av tecken 
definitionen. Låter vi därför CHARS ha ett annat värde kan vi 
"lura" datorn att definitionen ligger på annan adress. 

Så långt teori, men hur gör man i praktiken? 

Vi skall nu lägga in en mängd nya tecken i datorn. Denna 
process kan delas upp i 2 bitar. De nya tecknens utseende och 
omställning av CHARS. Omställningen av CHARS är lättast 
därför börjar vi med den. 

Originalvärderna i CHARS är 23606,0 och 23607,60. Vill vi 
nu att CHARS skall peka på adress 30000 så skall CHARS ges 
värdet 29744. Detta gör vi med instruktionerna POKE 


23606,29744-256xlNT(29744/256) samt POKE 23607, 
INT(29744/256). 

Än så länge kommer detta förfarande att bara leda till en 
absolut blank skärm. Innan du ställer om CHARS måste du 
lägga in dina egna teckendefinitioner i adress 30000 till 30767. 
Där skall varje rad i vart tecken läggas in i rätt ordningsföljd. Om 
du tittar på appendix A i manualen så finner du i vilken 
ordningsföljd tecknen kommer från code 32 till code 127. 
Dessa codenummer har ingenting att göra med omdefinitionen, 
ordningsföljden är den samma. 

De siffror du lägger in i adress 30000 till 30007 kommer 
därför att bilda mellanslag när CHARS ställs om. Det är mycket 
arbete att lägga in 768 bytes för hand speciellt om man skall 
räkna om dem från binärt till decimalt, därför har jag gjort en 
teckengenrator för Spectrum. Den fungerar liknande tecken- 
genratorn Characters på Horizonkassetten. 

När du kör detta program blir du först tillfrågad om i vilket 
minnesutrymme tecknen skall placeras. Välj då ett utrymme 
där definitionerna inte kan bli påverkade av program eller 
variabelvärden eller tvärtom. Nu kan du rita dina tecken på 
skärmen, använd då cursortangenterna. Håller du CAPS 
SHIFT nedtryckt ritar du, annars suddar du. När du är klar med 
ett tecken så tryck på ENTER och ange vilket tecken du vill ha 
omdefinierat: 

När som helst kan du bryta programmet och skriva GOSUB 
580. Detta gör att all utskrift på skärmen blir med din nya 
tecken. Var försiktig med detta innan du har definierat upp 
tillräckligt många tecken för att se vad du gör. Alla odefinierade 
tecken skrivs nämligen ut som ett tomt mellanslag. GOSUB 
620 återställer allt till det normala. 

Om du vill använda dig av tecknen i ett program så bör du 
lägga in subrutin 580 på lämplig programmerad och se till att 
alla variabler har riktiga värden. Glöm inte heller att spara 
undan din tecken-definition och sedan ladda in den till 
programmet med LOAD "(namn)" CODE. 



Programbeskrivning 

Täfl 

60-120 

130-280 

290-570 

580-610 

620-640 

650 


initiering 

huvudloop 

avläsning, inläggning samt utskrift 


ställer CHARS 
återställer CHARS 
variabellista (ej nödvändig) 
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10 

20 

30 

40 

50 

60 

70 

80 

90 

100 

110 

120 

130 

140 

150 

160 

170 

ISO 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

320 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

INNE 




*** 


*»***’, 


REM «»*•*’ *(J® 1 * 


... kbät.**’* 

RE " 

REM ,«.***’ 

REM ** 

DIM A(8) 

LET BR=1 

INPUT "ANGE MINNESUTRYMME";PEK 
LET PEK=PEK—256 

FOR 1=0 TO 7: PRINT BRIGHT 1; AT 1,0;" 



NEXT I 

LET X=0: LET Y=0 

PRINT INK 5;AT X,Y; BRIGHT BR; FLASH 1;" " 

LET COD=CODE INKEY$ 

IF COD>52 AND C0D<57 THEN PRINT AT X,Y; PAPER 8; BRIGHT BR;" » 
IF X<8 AND Y<8 AND C0D>7 AND C0D<12 THEN PRINT AT X.Y; OVER 1; 
LET X = X+ <C0D=54)-(C0D=55) + (C0D=10)-(C0D=11> 

LET Y=Y+(C0D=56>-<C0D=53)+(C0D=9)-<CQD=8) 

IF Y>8 THEN LET Y=8 


IF X>8 THEN LET X=8 
IF X<0 THEN LET X=0 
IF Y<0 THEN LET Y=0 
LET BR=1 

IF Y>7 OR X>7 THEN LET BR=0 
IF C0D=13 THEN GO TO 0290 
LET C0D=0 

IF INKEY*<>"" THEN FOR 1=7 TO 10: BEEP .01,1*6: NEXT I 
GO TO 0130 


T* 


THEN LET BI=BI+2u(7-J) 


!AT I,10;BI 


PRINT AT X.Y; BRIGHT BR; 

INPUT "I VILKET TECKEN? 

FOR 1=0 TO 7 
LET B1=0 
FOR J=0 TO 7 
IF SCREEN* (I,J)<>" 

NEXT J 

PRINT AT I,10;" "i 
LET A < 1+1)=BI 
NEXT I 

LET C0=(CODE T*-32>»B+PEK+ 

FOR 1=0 TO 7 
POKE CO+I,A(1+1) 

NEXT I 

FOR 1=32 TO 63 

PRINT AT 10,1—32;CHR$ I 

PRINT AT 13,1-32;CHR* (1+32) 

PRINT AT 16, 1—32;CHR$ (1+64) 

GO SUB 0580 

PRINT AT 11,1-32;CHR* I 
PRINT AT 17,1—32;CHR$ (1+64) 

PRINT AT 14,1—32;CHR$ (1+32) 

GO SUB 0620 
NEXT I 

INPUT "VILL DU SPARA DETTA";Q$ 

IF □$="" THEN GO TO 0100 
IF Q*(1)="J" THEN INPUT "FILNAMN"; 
GO TO 0100 
STOP 

REM STALL PEKARE 

POKE 23606,PEK-256*INT (PEK/256) 
POKE 23607,INT (PEK/256) 

RETURN 
REM RESET 

POKE 23606,0: POKE 23607,60 
RETURN 

REM VARIABLER AO BR PEK 

CA. 2 kB 
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★ SUPERSNABB MASKINKOD* ★ 

★ VIC20/64*ATARI*SPECTRUM* 

★ ★★*★★★★★★★★★★★**■*•*★*•**** 


GETAWAY VÅR SUCCÉ!!! 59:50 

Var med om en spännande biljakt i kända New York kvarter. 

Bankrån. skrikande däck. tjutande sirener utgör endast en del 
av upplevelsen i detta fantastiska spel. 

BUGCHASE 49:50 

Ett snabbt och spännande spel som tränar upp dina reflexer. 

OBSI Ej lämpligt lör hjärtsvaga personer. 

CATERPILLAR 49:50 

Ett fängslande spel för två. 

läxhjälp 49:50 

Hjälper dig klara läxan. OBSI Förväxla inte detta överlägsna 
kvalitetsprogram med andra liknande program skrivna i Basic. 

matte 39:50 

Träna huvudräkning med ny trevlig metod. 

SUPERM ath 79:50 

Huvudräkningsövning i Lyx. utförande med mycket avancerad 
grafik och ljudeffekter, en spännande dragkamp mellan dig och 
din motspelare ingår. 

GEOGRAFI 79:50 

Testa familjens kunskaper 


MASTERMIND 49:50 

Det klassiska intelligensspelet i modern tappning. En eller flera 
deltagare. 

REAKTIONSTEST 49:50 

Testa din reaktionstid och tävla mot dina vänner. Oerhört 
populärt. 

SKIING 149:95 

Slalom. Bästa varianten av detta succéspel. 

icepusher_249tT5” 199:75 

Du befinner dig i ishavet. Krossa eller knuffa omkring isblock 
för att undkomma dina förföljare. Varning detta är spelet du 
inte kan sluta att spela frivilligt. ARETS SPEL? 



...st GETWAY 
...st BUGCHASE 
...st CATERPILLAR 
...st LÄXHJÄLP 
...st MATTE 
...st SUPERMATH 
...st GEOGRAFI 
...st MASTERMIND 
...st REAKTIONSTEST 
...st SKIING 
...st ICEPUSHER 
DATOR □ VIC-20 

□ VIC-64 

□ ATARI 


Namn. 

Acknss.... 
Postadress. 



SWEDESOFT 

I.D. PROGRAM 
KONSULT HB 
BOX 50081 
95105 LULEÅ 
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KKKKK=Superb 

KKKK=Utmärkt 

KKK=Bra 

KK=Godkänd 

K=Dålig 



Cruising’ 


KK 


listributor: Indag Data 
Maskin: Spectrum 
Typ: Kassett 

"Cruising" är ett av 
dessa abstrakta spel 
som det ar svårt att tå 
något grepp om. Enligt 
reklamen skall det vara 
ett snabbt dackbrannar- 
spel som handlar om 
en biljakt längst Broad- 
way 

I själva verket består 
spelplanen av fem fyr¬ 
kanter som bildar en 
bana dar du skall köra 
runt med en liten blipp 
Du är |agad av en annan 
blipp och kan endast 
stoppa den genom att 
gräva ett hål Med lite 
utvecklad grafik och 
ett spel som låg när¬ 
mare det reklamen ut¬ 
lovade skulle detta ha 
kunnat bli ett intressant 
spel. Nu tycker jag bara 
att det är mediokert 
och abstrakt 



Naturligtvis är det svårt 
Men inte ens detta fak¬ 
tum kan uppväga den 
kansla av "Jasså var 
det inte mera" som in¬ 
finner sig efter ett litet 
tag Det verkar som 
"Cruising" var ett av 
de första spelen som 
Sunshme gav ut och 
man måste ju saga att 
de har bättrat sig sen 
dess. 

Clas 


T error-Dactyl 


K K K K K 

Distributör: Indag Oata 
Maskin: Spectrum 
Typ: Kassett 

Ännu ett toppspel för 
Spectrumägarna! Man 
kan bara undra när man 
skall få råd att köpa 
alla bra spel som finns 
på marknaden 
Rymdskeppet du åker 
med har störtat på en 
främmande planet och 
räddningen anländer 
om sex dagar. Den fjär¬ 
de dimensionen i det 
här fallet skulle iså fall 
vara tiden Men det är 
den tredje dimensionen 
som gör spelet så fantas¬ 
tiskt. Jättelika urtidsfåg- 
lar kommer flygande 
mot dig i tredimensio¬ 
nellt perspektiv. Man 
bara väntar på att de 
skall krossa TV-skär- 
men och flyga ut i rum¬ 
met. 

Det enda som irriterar 
är att flocken av dacty- 



Blind Alley’ 


K K K 


, "c****** 

ler i bakgrunden på¬ 
minner allt för mycket 
om ett gang med "space 
invaders" Till ditt förs¬ 
var har du bara en 
gammal kanon och du 
måste ställa inrätt ele¬ 
vation och placera den 
på rätt plats för att kun¬ 
na skjuta ned dactyler- 
na. 

Detta spel är svårt, 
mycket svårt till och 
med. Kanske det är 
detta faktum som gör 
det till ett av markna¬ 
dens bästa Spectrum- 
spel. 

Clas 


Distributör: Indag Data 
Maskin: Spectrum 
Typ: Kassett 

Det gick en film på 
biograferna för ett tag 
sedan som hette 
TRON". En av de mest 
fantastiska scenerna 
där var en jakt på hyper- 
snabba motorcyklar där 
man skulle stänga in 
motståndaren i sitt eget 
spår. Detta är en klass¬ 
isk idé bland dataspe¬ 
len och "Blind Alley" 
fungerar på samma sän. 
Spelet börjar ganska 
enkelt med två motstån¬ 
dare som du skall ringa 
in och fortsätter med 
fler och fler motstånda¬ 
re och högre och högre 
fart Man har även lagt 
in en bränslemätare vil¬ 
ket tvingar spelaren till 
mycket offensivt spel. 
Kull 

I all sin enkelhet tycker 
jag faktiskt att "Blind 



Alley" är ett mycket 
spännande spel. Visst 
är idén gammal men 
själv har jag alltid upp¬ 
skattat denna typ av 
jakt och jag har en 
känsla att jag inte kom¬ 
mer att tröttna på del i 
längden. 

Visst hade det varit fint 
om "Blind Alley" hade 
satsat mer på grafik¬ 
sidan som det är nu så 
är spelet mycket abs¬ 
trakt. Men man kan ju 
inte få allt. 

Clas 



Space Action’ 


K K K 


listributör. Handic 
Maskin: VIC-20 
Typ: Kassett 

Ett svensktillverkad 
rymdspeli Det är inte 
Hårsfiardsbröderna 
som slår till igen utan 
en hacker vid namn 
Arne Fernlund. 

Spelet går ut på att du 
patrullerar kusterna av 
en planet som håller 
på att invaderas av utom- 
lordiska varelser. Därför 
skall du skjuta ned så 
många som möjligt. Det 
ar svårt eftersom spelet 
är nästan alltför snabbt. 
"Space Action" ar av 
Defendertyp med den 
skillnaden att du bara 
kan röra dig åt ett håll. 
Du kan försvara dig 
med en skyddskold, 3-8 
poäng får du per UFO 
och den siffran multipli¬ 
ceras med den nivå 
där du befinner dig 
Grafiken är utmärkt och 




Swordfight” 


vissa ljudeffekter är bra 
Speciellt explosionerna 

Mikael 


K K K 


Distributör: Indag Data 
Maskin: Spectrum 
Typ: Kassett: 

Först måste jag göra 
en bekännelse Jag be¬ 
grep mig inte riktigt på 
vitsen med detta spel. 
Meningen ar att det 
skall simulera en svärds- 
duell i gryningen mellan 
två franska kavaljerer. 
Så långt ar allt gott 
och väl. 

I praktiken visar spelet 
två mycket vältecknade 
figurer som kan ställas 
i tre olika positioner 
parenng, stick och hugg 
Dessa figurer kan även 
flyttas fram och tillbaka 
över skärmen Vilken 
effekt dessa olika aktio¬ 
ner har meddelas tyvärr 
inte i spelet, det enda 
du tår reda på är hur- 
passsåradduär Men 
genom någon form av 
mirakel eller kanske re- 
genenngsformåga tycks 






såren läka om man 
ställer sig på visst av¬ 
stånd från varandra. 
"Swordfight" ar ett spel 
som kraver snabb reak- 
tionstörmåga och tak¬ 
tiskt sinnelag 
'Swordfight" skulle egent¬ 
ligen fått K K om det 
inte vore för två saker 
För det första ar grafiken 
helt superb och för det 
andra finns möjlighet 
att spela spelet på två 
personer, 

Clas 


Galaxy Attack 


Oistributör: Indag Data 
Maskin: Spectrum 
Typ. Kassett 

Spelet är uppdelat i tre 
olika avsnitt. I del ett 
sitter du i ett rymdskepp 
och ser ut över de an¬ 
fallande varelserna, det 
är meningen att du skall 
skjuta ned så många 
som möjligt. Del två lär 
vara en Scramblevari- 
ant och del tre är den 
stora finalen då du går 
till attack mot främlin¬ 
garnas högkvarter. Jag 
skriver lär vara eftersom 
jag aldrig har lyckats 
nå över nivå ett Det 
verkar nämligen hopp¬ 
löst att pricka ned de 
anfallande rymdskep¬ 
pen. Den som har större 
fingerfärdighet än jag 
kan nog bereda sig på 
en hård dust mot främ¬ 
lingarna 

Grafiken ar godkano 
och detsamma kan 



sägas om ljudet. Det 
verkar vara den senaste 
idén. detta att ha en 
utsikt mot rymden och 
så att säga omvandla 
sin dator till en strids- 
central Lite nya idéer 
på spelfronten skulle 
inte sitta dum! Men 
något spel av den sor¬ 
ten bör man ju ha i sin 
samling och då finns 
det sämre val än "Ga¬ 
laxy Attack" 

Clas 
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receKöiotier 



Mazeman' 


KK 

Distributör: Riko Data 
Maskin: Spectrum 
Typ: Kassett 

Instängd i en mystisk 
labyrint, jagad av hung¬ 
riga Hobgoblins är din 
enda chns att nå det 
beryktade Abersvärdet 
och på så sätt ta kål 
på monstren innan svär¬ 
det försvinner. Under 
tiden skall du skaffa 
poäng genom att besö¬ 
ka så stor del av laby¬ 
rinten som möjligt. Låter 
det spännande? 
Hobgoblins var spelets 
namn på spökena och 
de beryktade Abersvär- 
den såg exakt ut som 
kraftpiller. Det är inget 
fel på "Pac-Man" men 
det kändes ungefär som 
att gå in på en restau¬ 
rang beställa en entre- 
cote och sen bli serve¬ 
rad äppelkaka Bägge 
delarna är goda men 
äppelkaka är inte entre- 
cote. 



y 

Nå|a, "Mazeman" är 
välgjort och trevligt så 
den som vill ha en kopia 
av Pac-Man hemma 
bör nog kasta ett öga 
på den här varianten 
från Abersoft & Riko 
Data. Ljudet är dock 
inte så bra på den här 
varianten Det är bara 
ett tickande och en 
ledsen melodi när man 
dör Detta och en fånig 
presentation drar ned 
betyget 
Clas 


Distributör: Datamaxx 
Maskin: Spectrum 
Typ: Kassett 

"ZIP ZAP" kommer från 
Imagine och detta inne¬ 
bär som vanligt god 
teknisk kvalitét. Det finns 
inte många producenter 
som klarar att hålla 
samma |ämna höga stan¬ 
dard på den grafiska 
och ljudmässiga sidan 
Tyvärr kan inte samma 
sagas om deras spel- 
idéer Det finns vissa 
av deras spel som är 
en njutning att se på 
men att spela dom är 
bara "sådär". Tyvärr 
får man väl räkna in 
"ZIP ZAP" i denna kate¬ 
gori. 

Du skall styra en robot 
over skärmen och samla 
in något som kallas 
"teleportals". underti¬ 
den svävar ett antal 
varelser omkring och 
försöker ta kål på den. 
När du har samlat 



Androids’ 


K K K K K 

Distributör: Indag Data 
Maskin: Spectrum 
Typ: Kassett 

Detta är ett spel som 
jag tycker mycket om 
Du befinner dig i en 
jättelik labyrint, flera gån¬ 
ger större än skarmen 
Men du ser bara en så 
stor del av labyrinten 
som skärmen täcker 
Där är du |agad av 
androider (syntetiska 
människor) men tack 
och lov så har du ett 
lasergevär med dig. I 
labyrinten finns ett antal 
blå dörrar. Genom des¬ 
sa kan du passera fritt 
men inte androiderna 
Det finns även "mat¬ 
kontroller" och uppladd- 
nmgsstationer för ditt 
lasergevär. Syftet med 
spelet är att du skall 
hitta utgången 
Det trevliga med "And¬ 
roids" är att man föru¬ 
tom god koordinations- 
förmåga också måste 





Golf” 



besitta ett visst mått 
av både taktiskt kunnan¬ 
de och gott minne 
Dessutom har spe¬ 
let en demomode vilket 
gör att man kan låta 
datorn spela ett par 
gånger i början mens 
man sjalv tittar på och 
funderar ut nya strate¬ 
gier 

Detta är ett spectrum- 
spel nar det är som 
trevligast! 

Clas 


K K K 

Distributör: 

Maskin: Spectrum 
Typ: Kassett 

Golf är väl ett av de 
spel som jag kan förstå 
syftet med att lägga 
på dator. Det är väldigt 
tå av oss som har råd 
att punga ut med de 
lusenlappar som det 
kostar att bli medlem i 
en golfklubb Efter att 
de senaste dagarna ha 
sett diverse matcher 
på TV har jag fått ett 
visst intresse for spelet 
Det var därför med viss 
förväntan jag laddade 
in "Golf" från Abrasco. 
Tyvärr kom mina för< 
hoppningar på skam 
Detta ar en ganska trist 
simulator Man har bland 
annat eliminerat det som 
jag tycker gör golf till 
en mycket sympatisk 
sport, nämligen handi¬ 
kappsystemet Med 
hjälp av detta kan två 
spielare med olika skick¬ 



lighet utmana varandra 
på en jämn match Det 
är en klar nackdel med 
Abrascos "Golf Däre¬ 
mot har man ett hyfsat 
urval av klubbor och 
en vind som påverkar 
spelet Dessa detaljer 
är "Golfs" fördelar 
Jag väntar ivrigt j?å att 
den dag skall komma 
då en bra golfsimulator 
finns tillgänglig på mark¬ 
naden men fram tills 
dess får man val hålla 
tillgodo med denna 9- 
hålsvariant. 

Clas 



Cosmic 

Jailbreak 


fyra "teleportals" kan 
du bege dig till nästa 
skärm och där blir allt 
värre. Dessutomär robo¬ 
ten trasig så den kan 
bara gå i cirklar. Spelet 
är mycket abstrakt och 
man saknar på något 
sätt den identifiering 
som gör ett spel till ett 
bra spel 

Vill du ha ett nytt spel 
till din Spectrum skall 
du testa ZIP ZAP Det 
är ju inte säkert att vi 
har samma smak. 

Clas 


K K K K 

Distribution: Handic 
Maskin: VIC-20 
Typ: Cartridge 

En vidareutveckling på* 
temat "Space Inva¬ 
ders". 

Tre "Invaders" har 
blivit inburade i en tegel¬ 
byggnad och tjugosex 
vänner till dem försöker 
plocka ned fängelset i 
småbitar och frita dem 
Om du skjuter ner en 
"Invader" innan han 
har hunnit springa bort 
med tegelstenen han 
tagit så dör han. och 
puff så finns stenen på 
plats igen! 

Om en av fångarna 
lyckas komma undan 
eller om du blir träffad 
av en bomb, blir du av 
med ett av dina tre 
lasertorn. Om du klarar 
av att skjuta ned alla 
tjugosex kommer lika 
många nya igen. Dessu¬ 
tom kommer ett rymd¬ 
skepp som är mycket 



svårt att skjuta ner att 
ställa sig ovanför dig 
så at du inte kan skjuta 
ned några "Invaders" 
förrän det är utplånat 
Grafiken är godkänd 
och visst känns figu¬ 
rerna och ljudeffekter 
igen från det vanliga 
"Invaders". Tydligen 
skall det spelet ej falla 
i glömska än på ett bra 
tag 
Daniel 


”Hungry 

Horace” 


K K K K K 

Distributör: Datamaxx 
Maskin: VIC-24 
Typ: Kassett 

"Pac-Man". "Pac-Man" 
en oändlig massa "Pac- 
Man"! Det finns "Pac- 
Man" av alla sorter och 
på alla datorer Usch, 
tänkte jag därför nar 
jag upptäckte att "Hung¬ 
ry Horace" också var 
in "Pac-Man"-variant 
Så fort spelet var inlad¬ 
dat märkte jag dock 
att detta var annorlunda, 
festligare. 

"Pacmannen" är utbytt 
mot en gubbe med stort 
huvud och korta ben 
som rör sig hela tiden 
Mycket naturtroget 1 Spö¬ 
kena är parkvakter och 
kraftpillren är en klocka 
I varje labyrint finns en 
ingång och en utgång 
Det finns fyra labyrinter 
och om inte detta skulle 
räcka kan du tillverka 
dina egna (gäller endast 
VIC-64) I labyrinterna 



skall du äta blommor 
och den mat som vak¬ 
terna tappar L|udet är 
mycket bättre på denna 
version än på Spectrum- 
varianten 

"Hungry Horace" är ett 
spel jag verkligen kan 
rekommendera! 

Mikael 
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’iece*t4io*ten 


Rail 

Runner 

K K K 


Distribution: Datanor- 
dlc 

Maskin: Dragon 
Typ: Cartridge 
Har skal! du ta Bill till 
luffarna i nederdelen 
av skärmen. Det skulle 
vara enkelt om inte det 
var nedlusat med dres- 
siner och tåg. Luffarna 
skall sedan föras till 
Hermans hus i över¬ 
kanten av skärmen. 
Detta påminner lite om 
"Frogger" och är egent¬ 
ligen en variant av det 
Grafiken är bra men 
ljudet lite dåligt 
Vi hade många timmars 
nöje av detta spel men 
vi tyckte inte om joy- 
slickarna Fördelen är 
det att det går att spela 
två personer och att 
presentationen av spe¬ 
let är trevligt 



Det dåliga ljudet be¬ 
fogar inte en fyra i 
betyg. 

Rec av Clas 




Cave 

Hunter 

K K K 


Distribution Datanor- 
dic 

Maskin: Dragon 
Typ: Cartridge 
En Pac-Man variant är 
detta spel 

Du går runt i r- abyrmt 
för att hämta g klimp- 
ar och föra ti till 
utgången Dt, finns 
ormliknande monster 
som jagar dig och du 
kan precis som i Pac- 
Man äta kraftpiller och 
sedan äta monstren 
Nytänkandet i detta 
spel är guldklimparna 
Ljudeffekter och grafik 
är bra men bättre går 
säkert att åstadkomma 
Vi spelade ganska län¬ 
ge och fick det intryc¬ 
ket att joysticken inte 
svarade helt riktigt 
Spelet är svårt och 
krävande 
Rec av Clas 




”Galactic 

Abductor” 

K K K K 


Distribution: 
Datamaxx 
Maskin: Vlc-20 
Typ: Kassett 
Snabba på! Rymdfalk¬ 
arna kidnappar männi¬ 
skorna du har i uppdrag 
att bevaka Detta ar den 
som attackerar I de 
flesta andra rymdspel 
är det du själv som 
inkräktar och dödar Nu 
skjuter du endast i 
siälvförsvar och för att 
rädda dina medmänni¬ 
skor Om en rymdtalk 
tar en människa måste 
du snabbt få en en träff 
på den hemska fågeln 
annars får du bara till¬ 
baka skelettet av män¬ 
niskan. 

Fåglarna släpper ägg 
som kläcks när de når 
marken Du måste för¬ 
göra ungarna som kom¬ 


mer ur äggen, dessa 
sätter genast fart mot 
dig med mord i blicken 
Spelet har fin grafik och 
bra l|udeffekter Rymd¬ 
falkarna är svåra att 
skjuta ned. det behövs 
tre träffar för att ta kål 
på dem och därför är 
det inte många som 
dör De flyger i be¬ 
stämda banor vilket gör 
att man kan lära sig hur 
de kommer att röra sig 
Spelet kräver 16 K Ram 
extra 

Rec av Daniel 




”Jumping 

Jack” 

K K K K K 



Space 

Raiders 

K K K 


>» 



Distrubutör: 
Datanordic 
Maskin: Dragon 
Typ: Cartridge 
På Vic kallas detta spel 
för "Amok" 

Uppgiften är att gå 
igenom en mängd olika 
rum och försöka elimi¬ 
nera så många robotar 
som möjligt Dessutom 
är du jagad av otäcke 
Orville som glatt leende 
studsar ihjäl dig Vägar¬ 
na är också elektriska 
För att undvika Orville 
och för att kunna skjuta 
robotar så måste du 
ständigt hålla dig sprin¬ 
gande 

Grafiken får godkänt så 
även spelet i sin helhet 
Rec av Clas 


Distribution: 
Datamaxx 
Maskin: Spectrum 
Typ: Kassett 
Nu kan "Donky Kong" 
gå hem och dra nåt 
gammalt över sig. "Jum¬ 
ping Jack" är här! 

Han skall klättra upp 
20 våningar, dessutom 
är han jagad av spind¬ 
lar, monster och all¬ 
sköns bråte Det finns 
ca 10 plan på varje 
våning och i golven 
finns hål som rör sig. 
Genom dessa hål kan 
Jumping Jack hoppa 
upptill nästa plan eller 
trilla ned till det undre 
För varje skärm du kla¬ 
rar läser han 2 rader ur 
en vers. 

Jag är fast. jag kan inte 
sluta att spela 1 Ursäkta 
jag skall bara spela 
några omgångar till så 



avslutar jag recensio¬ 
nen senare 
Rec av Clas 



Distributör: Beckman 
Maskin: Spectrum 
Typ: Kassett 
Alla som över huvud¬ 
taget kommit i närheten 
av arkadspel har väl 
sett "Space Invaders" 
Detta spel där man blir 
anfallen av fyra rader 
UFO s och har en sta¬ 
tion som kan röra sig 
sidledes i under kanten 
av skärmen och där 
beskjuta UFO "Space 
Raiders" är Psions ver¬ 
sion av detta 
Alla arkadspelsklassi- 
ker finns ju i sin dator¬ 
version Den utvecklin¬ 
gen är väl inte mycket 
att säga om, men mig 
irriterar det lite 
Här har man lyckats 
gör en perfekt över¬ 
föring med snygg grafik 
och intressanta liudillu- 
strationen Det finns 


dock en liten felaktighet 
i den här versionen 
Om man lägger sig ba¬ 
kom ett av skydden och 
skjuter en liten skott¬ 
glugg där. så ligger man 
tämligen säker för alla 
nedfallande bomber 
Spelet blir på så sätt 
alltför enkelt 
Man har kompenserat 
det genom att göra sta¬ 
tionen i botten extra 
bred vilket försvårar 
spelet en aning. 

På något sätt känns 
spelideen ganska pas¬ 
sé 


Rec av Clas 



59 





















KKKKK=Superb 

KKKK=Utmärkt 

KKK=Bra 

KK=Godkänd 

K=Dålig 


”Vu File” 

K K K K K 


Distribution Beckman 
Maskin: Spectrum 
Typ: kassett 

Hur många gånger har man 
inte hört uttrycket "Du bara 
leker med dm dator" Kan 
den inte göra något nyt¬ 
tigt?" 

Bristen på nyttoprogram 
till Spectrum ar markant 
och det ar kanske det som 
gor den helt oförtjänt fått 
ryktet som speldator 
"Vu File" ar ett nyttopro¬ 
gram och ett bra sådant 
Min första tanke var "Fil¬ 
hantering på Spectrum. så 
pretentiöst " Men den vill¬ 
farelsen togs jag snabbt ur 
efter att ha provkört pro¬ 
grammet 

Detta ar programmet som 
hjälper dig att lagga upp 
ett register S|alv tanker 
jag forsöka att äntligen få 
någon ordning på mm skiv- 
samlmg av gamla sten- 
kakor 

Det börjar med att man blir 
ombedd att definiera upp 
den blankett på vilken 


uppgifterna skall fyllas i I 
mitt fall med gamla sten- 
kakor skulle dessa upp¬ 
gifter vara b la titel, artist, 
skivmarke, skivnummer. 
etc Sedan fyller man i 
dessa uppgifter på varje 
blankett Datorn kan sedan 
sortera och eller plocka 
fram exakt den blankett 
man vill ha 

Bruksanvisningen ar före¬ 
dömligt välskriven men 
detta ar ett tillfälle då man 
skulle önska att det med¬ 
följde en svensk översätt¬ 
ning Jag skulle tro att det 
tar en person ett par dagar 
att lara sig utnyttja Vu File 
maximalt 


Ett mycket bra nyttopro¬ 
gram till Spectrum 
Rec av Clas 




Distribution Datamaxx 
Maskin: VIC-20 
Typ: Kassett 
Detta spel innehåller mgen 
ny spelidé utan är ett hop¬ 
plock av gamla spel Det 
ar uppdelat i fyra delar 
Spelet går ut på att man 
med tre skepp skall in¬ 
vadera en hel planet, vilket 
ju egentligen borde vara 
omöjligt men i dataspelens 
värld är allt möjligt 
I första fasen gäller det att 
få ned rymdskeppet på 
planetens yta Du skall sty¬ 
ra och bromsa dig igenom 
stensvarmar som ligger i 
en bana runt planeten Väl 
nere på ytan böriar spelets 
andra fas som är verkligt 
snabb Fem fiender försö¬ 
ker tackla dig och du måste 
springa för livet Tredje 
fasen ar gamla beprövade 
"Space Invaders" och 
innehåller mga överask- 
mngar Slutligen kommer 
en del hämtad från "Phoe- 
mx". Huvudskeppet skall 
skjutas men först skall 


skyddssköldarna förgöras 
och hela tiden anfaller 
mängder av små skepp 
Spelet har något nödtorf¬ 
tiga ljudeffekter men ut¬ 
nyttjar VIC-ens grafik myc¬ 
ket väl Andra och fjärde 
stadiet är mycket snabba 
och kräver verkligen skick¬ 
lighet och reaktionstörmå- 
ga Det ar såpass svårt att 
klara sig igenom alla sta¬ 
dierna att man mte tröttnar 
på spelet 

Ett mycket bra spel för den 
som fortfarande ar rymd- 
frälst Spelet behöver 16 K 
extra minne. 

Rec. av Daniel 


”Wizards” 

K K 


Distribution: Handic 
Maskin VIC-64 
Typ: Cartridge 
Har är spelet som definitivt 
kommer att reta pacifister 
och alla fredsalskare' 
Spelet går ut på att tränga 
hogexplosiva monster i ett 
hörn och sedan trycka på 
avskjutaren på dm laser K- 
pist så att monstrets sprängs 
i tusen bitar Nå så farligt 
kanske det inte är när man 
tänker på regeln, dödas 
eller döda 

Chanserna att överleva ar 
inte speciellt stora efter¬ 
som monstrerna som bor i 
denna labyrint både är 
snabba, farliga och smarta 
Ju längre tid du tar på dig 
desto snabbare och far¬ 
ligare blir dom När du kla¬ 
rat monstren i en labyrint 
dyker något upp som liknar 
en "Gorf" denna är snab¬ 
bare och farligare än de 
andra 

Efter andra kartan och 
varannan karta framåt så 
dyker en trollkarl upp 


Denna hypersnabba ting¬ 
est ar verkligen något att 
sätta tänderna i för troll¬ 
karlen inbringar en hög 
poängsumma var gång den 
blir träffad 

3000 poäng tår man nar 
man klarat en karta Enligt 
instruktionerna Så skall 
man få ett extra liv vid 
20000 poäng Vid de sju 
tillfällen som vi kom upp i 
dessa poäng fick vi endast 
en gång ett extra liv Detta 
tyder på ett programme¬ 
ringsfel 

Ibland hoppar figurerna ett 
par centimeter utan an¬ 
ledning Trots detta så ar 
spelet roligt och blir inte 
tjatigt som många andra 
spel Spelet ar inte så 
brutalt som det beskrevs i 
början men fortfarande ratt 
så brutalt Något för den 
som gillar att skjuta 
Rec av Mikael 




Crazy 
Kong 
KKKwmm 


Distribution Datamaxx 
Maskin: Vic-64 
Typ: Kassett 
Marioden stackars snicka¬ 
ren som försökt rädda sm 
fastmo i nastan alla spel¬ 
hallar och på de flesta 
datorer gor nu ett nytt 
tappert forsOk på Vic-64 an 
Detta gor han förgäves för 
64 ans variant ar både tylld 
med fart och en mer kräsen 
flickvän 

Han skall plocka upp alla 
diamanter han hittar och 
detta skall han göra under 
tiden som tunnor kommer 
rullande emot honom Som 
om inte detta skulle racka 
sitter diamanterna fast i 
taket Tunnorna som rullar 
mot dig finns bara på första 
leveln, det finna fyra. på 
andra leveln finns det rull- 
band och tempot ar betyd¬ 
ligt högre här än på Volvos 
rullband’ 

Längre än så har har vi 
som testat spelet mte kom¬ 
mit. men tranar du flitigt 



kan du säkert klara alla 
svårigheterna 
Spelet är som sagt otroligt 
snabbt och roligt, detsam¬ 
ma gäller mte grafiken som 
mte ar vad man vantat sig 
av Vic-64 ans stora grafik- 
möjiigheter 

Spelet håller att spela 
länge Betyg 4 ar mte be¬ 
fogat i och med den dåliga 
grafiken 
Rec av Mikael 




Distribution: Handic 
Maskin: VIC-64 
Typ Cartridge 
Förväntningarna var stora 
på detta program och be¬ 
svikelsen var minst lika 
stor Programmet visade 
sig vara ett omgjort VIC-20 
program Spelplanen är 
nedkrympt och tar mte ens 
upp 1 /4 del av bildskär¬ 
men. lagg därtill en ryckig 
spelplan i tråkiga färger, 
mga spritar en otroligt tjatig 
melodi som spelas hela 
tiden och det hela blir gan¬ 
ska tråkigt 

Spelet bygger som så 
många andra spel på ett 
arkadspel just det har 
bygger på Raiiy-x 
Det handlar om en mus 
som i en labyrint skall ata 
upp all ost som ligger ut¬ 
spridd Han jagas av flera 
onda råttor och här och 
var sitter det katter och 
lurar Till höger på spel¬ 
planen ser man en över¬ 
siktskarta var ostarna lig¬ 


ger och var man sjalv ar 
någonstans samt de för¬ 
följda råttorna Nar man 
klarat en karta börjar det 
om men denna gången 
med fler råttor som jagar 
Detta spelet kunde blivit 
jattebra om man utnyttjat 
VIC-64 ans stora grafik- 
möjligheter. 

Rec av Mikael 




”Motor 

Mania” 

K K K 


Distribution: Grana 
Maskin: Vic-64 
Typ: Kassett 
Har är ett spel som enligt 
annonserna är ett fantas¬ 
tiskt demo av spritar och 
ljud (i engelska tidningar) 
Visst fmns har spritar och 
ljud men mte till den grad 
att spelet skulle kunna 
kallas extraordinärt 
Spelet går ut på att kora en 
bil (ser ut som en Formula 
1-bil) på en motorväg Efter 
en stunds körnmg på mo¬ 
torvägen kommer man m 
på en landsväg Här bör 
man se upp för ibland 
kommer stora stenbumlmg- 
ar rullande och kör man på 
en av dessa-det kommer 
tre stycken-så kraschar 
bilen Då blir man av med 
en av de fem bilar man fått 
sig tilldelad i börian av 
spelet 

Nar man passerat en var¬ 
ningsskylt smalnar vagen 
och man bör sänka farten 
för att klara den krokiga. 


smala grusvägen Ju läng¬ 
re man kört desto längre 
blir grusvägen Vid grus¬ 
vägens slut ligger en ben¬ 
sinstation och här kan man 
fylla på bensm. det basta 
är att bensinen ar gratis. 
Nu måste man också pas¬ 
sera korsningar och ibland 
kommer brandkåren tutan¬ 
de och det galler att inte 
krocka Stockar och glas¬ 
splitter kan också ligga på 
vägen och du kan mota 
bilar som försöker preja 
dig 

Sammanfattmgsvis kan 
man saga att det ar väl- 
giort utan programmerings¬ 
fel. grafik och l|ud är mte 
det bästa som fmns men 
relativt bra Spelet ar våld¬ 
samt roligt i början men jag 
tröttnade fort på det 
Rec av Mikael 
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”Attack of The 
Mutant Camels” 

K K K K K 


Distribution: Handic 
Maskin: VIC-64 
Typ: Cartridge 
Ännu en pluggmkassett 
från Handic Denna gång 
ar det ett spel av Jeff 
Minter 

Jorden har intagits av 
elaka fiender men de har 
intagit en annan skepnad 
som iattelika kameler För 
att skapa dessa kameler 
har man manipulerat med 
generna hos vanliga 
kameler och utrustat med 
en laserkanon och 
skyddssköldar Det finns 
aver. en hyperspace som 
för dig till en annan sektor 
av spelet 

En sektor består av 6 
kameler och för att skjuta 
ner en kamel måste du 
tränga genom hans fem 
skyddssikt. Kamelerna 
andrar farg när du skjutit 
igenom ett sikt Etter att 
skjutit ner de sex 
kamelerna aktiveras 
hyperspacen och under 
den tid det tar att komma 


upp i ljushastigheten 
möter du andra skepp Du 
måste alltså göra ett 
slags rymdslalom för att 
undvika dessa Så här 
fortsätter det tills du 
klarat alla 31 sektorerna 
Detta gör man aldrig i och 
med att svårighetsgraden 
hela tiden ökar Du valier 
i vilken sektor du skall 
börja . hur många spelare 
och om kollision med 
kamelerna skall vara 
tillåten 

Programmet har mycket 
bra grafik och ljud men 
kan bara spelas med joy- 
stick 

Rec av Mikael 



”Planetoids” 


K K K 


Distribution: Beckman 
Maskin: Spectrum 
Typ: Kassett 
Bland arkadspelen har 
aldrig "Asteroids" varit en 
av mma favoriter "Plane- 
toids" är Psion s version 
av Asteroids' och jag 
tycker faktiskt att det är 
roligare än sm kusin bland 
arkadspelen Det kan vara 
det att spelet är lite lång¬ 
sammare och att det bästa 
tekniken har inte ar att 
rotera på samma ställe och 
skjuta vilt omkring sig Den 
mbitne Asteroidspelaren 
kanske skulle invända att 
spelet ar för latt. 

För den som inte känner till 
idén bakom Asteroids' 1 
Planetoids'' kan berättas 
att historien ar följande 
Ditt rymdskepp har hamnat 
i ett asteroidsbälte For att 
komma ut måste du spran- 
ga sönder asteroiderna 
med kanonen i foren En 
söndersprängd asteroids 
delar sig i flera mindre som 
också måste förstöras Ett 



flygande tefat dyker upp i 
bland och beskjuter dig 
med målsokande missiler 
Med sm mjuka grafik och 
trovärdiga tröghetssimule- 
rmg ar det mte alls ett 
dåligt spel På baksidan av 
bandet ligger ett spel som 
heter "Missile" som man 
får på köpet 

Rent tekniskt ar detta väi- 
gjort men fick mig andå 
mte engagerad 
Rec av Clas 



Horace goes 
skiing” 

K K K K 


Distribution: Beckman 
Maskin: Spectrum 
Typ Kassett 

Horace är tillbaka igen 
denna gång ar han på skid¬ 
semester Det blev val lite 
stökigt i parken Detta ar 
en fristående uppföljning 
till "Hungry Horace". en av 
mma absolut favoriter 
Har skall Horace ta sig 
ned för en skidbacke men 
först skall han korsa en val 
trafikerad motorväg Så i 
själva verket ar detta två 
spel i ett 

I del 1 står Horace vid 
skidbacken, på andra si- 
dan motorvägen ligger 
skiduthyrnmgsfirman Han 
skall alltså ta sig over 
motorvägen, hyra skidor, 
över motorvägen igen och 
ta upp till backen Skulle 
han bli påkörd av en bil 
kostar detta 10 pund och 
nar man ar pank ar spelet 
slut 

Spelet påminner mycket 
om "Frogger" men ar gjord 
med den dar Horace-kän- 


slan vilket gor att det andå 
mte kanns helt tråkigt 
Lyckas man hyra ett par 
skidor och ta sig tillbaka till 
skidbacken så startar del 
2 av spelet Nu skall, 
Horace åka skidor 
Denna del ar verkligen ro¬ 
lig Man studsar over pis¬ 
ter. försöker undvika trad 
och åker mellan slalom- 
portarna Skall man vara 
kritisk mot något i detta 
spel skulle det kunna vara 
det taktum att del 2 ar så 
mycket roligare an del 1 
Det kanns lite tjatigt att 
efter varje misslyckande 
kampa sig fram och tillbaka 
över motorvägen 
Hade man utvecklat del 2 
kanske med andra åkare, 
storre grupp m m och helt 
strukit del 1 så hade det 
fått högsta betyg 




Submarine 

Commander 

K K K K K 


)istr.: Thorn EMI 
Maskin Atari 400/800 
Typ: Cartidge 

Här ar spelet för dig, som 
länge närt en dröm om att 
vara kapten på en ubåt 
Du befinner dig i Medel¬ 
havet med ditt fartyg under 
brinnande krig Dm uppgift 
ar att sänka de farygs- 
konvojer, som uppehåller 
sig i området På en karta 
ser du var konvoierna finns 
och hur de rör sig Du går 
upp i övervattenslagen. 
beordrar full fart framåt i 
maskinen och stavar med 
20 knops fart mot konvojen 
Nar du är mne i området 
får du signal Du dyker, 
kopplar in sonar-radarn 
och styr upp mot fienden 
på några meters djup Du 
tittar i penskopet. ser far¬ 
tyget närma sig Men se 
upp' Lagg mte ditt fartyg 
för nara ytan Då upptäcks 
du och drar på dig eld från 
de krigsfartyg som skyddar 


konvojen 

Avlossa en torped, kontrol¬ 
lera resultatet och dyk 
Men mte för d|upt för då 
kan skrovet sprangas Kop¬ 
pla in sonar igen. kontrol¬ 
lera eventuella skador och 
anfall nasta mål 
Det har ar ett oerhort 
spannande spel. som sät¬ 
ter dm reaktions och be¬ 
slutsförmåga på hårda 
prov' 

Spelet har fin grafik med 
tre olika displayer och full 
mstrumenter ring (13 st) 
En spelare kan spela och 
du har 9 olika spelvanan- 
ter Till skillnad från många 
rymdspel är det har ett 
spel. som du aldrig tröttnar 
ps 

Den stora nackdelen ar 
priset 795 - ar det rekom¬ 
menderade priset i han¬ 
deln 



uropas städer 
och länder 

K K K 


Distr: Vasatronic AB 
Maskin ATARI 400§800 
TypKassett 

Det här ar ett pedagogiskt 
spel för hela familjen Da¬ 
torn ritar upp en karta över 
hela Europa Slumpmäs¬ 
sigt ritas konturerna av ett 
land upp 

Din uppgift är att tala om 
vad landet och dess huvud¬ 
stad heter 

Svarar du tel så talar datorn 
om det riktiga svaret 
Nar spelet är slut och du 
har täckt upp hela Europa 
får du reda på hur många 
länder respektive huvud¬ 
städer som du besvarat 
rätt. 

Jag vill mte påstå att det 
har är spelet som är hetast 
dar hemma Men faktum är 
att hela familjen numera 
har en förbluffande god 
kunskap om var Europas 
länder ligger och vad dess 
huvudstader heter Och 
det ar väl så det är tänkt. 


att på ett enkelt och roligt 
sätt lara sig lite av del som 
man en gång lart sig, men 
som tyvärr mte stannat 
kvar i minnet 




Soccer 


K K K K 


Distr: Thorn EMI 
Maskin: Atari 400/800 
Typ: Cartridge 

Här galler det att hålla 
tungan rätt i munnen Du 
har 11 små gubbar att hålla 
reda på. och det galler mte 
bara att veta var dom ar 
Du skall kunna få de här 11 
att tillsammans gara mål 
Det handlar alltså om fot¬ 
boll. och Thorn EMI har 
lyckats riktigt bra i sitt 
uppsåt att skapa ett varia¬ 
tionsrikt och lagom svårt 
fotbollsspel och andå be¬ 
hålla en snygg och latt- 
överskådlig grafik 
Du börjar vid avsparks- 
punkten. dribblar, fintaroch 
försöker få bollen mot 
motståndarlagets mål Blir 
det för trångt omkring 
dig har du alltid möjlighet 
att passa bollen till någon 
av dina lagkamrater 
Till en borian ar spelet lite 
marigt, innan man kommit 
på tekniken att styra spe¬ 



larna Du måste ju näm¬ 
ligen kunna variera den 
"förande spelaren Men 
nar du val lart dig den 
tekniken blir spelet riktigt 
roligt 

Du kan variera spelet på 
följande satt 1 Extra svå¬ 
righetsgrad 2 Spela mot 
en kompis 3 Spela mot 
datorn 4 Du och en kompis 
spelar gemensamt mot 
datorn Totalt kan fyra 
spelare delta samtidigt 
Det enda grumset i glad|e- 
bagaren ar priset 625 - vill 
man ha för det i handeln 
enligt prislista 
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”Molar 

Maul” 

K K 


Distribution: Oatamaxx 
Maskin: Spectrum 
Typ: Kassett 

Detta är inget lämpligt 
spel tör dem som liksom 
undertecknad lider av 
tandläkarskräck Spel¬ 
planen här är nämligen 
en mun som fyller upp 
hela skärmen' 

Du har en tandborste 
och hur mycket tand¬ 
kräm som helst. Sen 
skall du bekämpa en 
massa D K-baciller ge¬ 
nom att tara runt i mun¬ 
nen och putsa tänderna 
innan bakterierna får 
dem att ruttna bort 

D K betyder Dento- 
rium Kamikazium och ar 
en dubbel engelsk ord¬ 
vits. D K uttalas näm¬ 
ligen som decay vilket 
betyder ruttna, vilket är 
precis vad tänderna gör 
i det här spelet Dess¬ 
utom är namnet en mild 
släng mot konkurentfir- 
man D Ktronics 

Hur gärna iag än skul¬ 



le vilja kan jag inte upp¬ 
bringa så värst stor en¬ 
tusiasm Inför "Molar 
Maul' 1 Rent tekniskt ar 
spelet välgjort som alltid 
när Imagine står för till¬ 
verkningen, men själva 
idén med en stor mun 
där man ser tänderna 
ruttna bort i en mun? 
Kanske någon skicklig 
psykolog kunde förklara 
varför iag känner så 
stark avsmak inför detta 
Men pröva det själv, 
det kan ju hända att du 
tycker att det är ett un¬ 
derhållande spel S|äiv 
föredrar jag att skjuta 
ned mystiska UFO s 

Rec av Clas 


”Spectron” 


K K K 

Distribution: Ronex 
Maskin: Spectrum 
Typ: Kassett 

Naturligtvis måste det 
finnas en "Space Inva¬ 
ders" på Spectravideo 
också. I detta fallet har 
man valt att kalla den 
"Spectron". 

Fyra rader av bomb- 
släppande UFO:s attac¬ 
kerar en rymdcentral på 
en planet som är vår 
gröna jord Två typer av 
attackskepp ingår i an- 
tallsstyrkan. Hombits 
och Sinkers Dessutom 
flyger ibland ett moder¬ 
skepp över skärmen in¬ 
om skotthåll 

Som hos alla spel på 
Spectravideo kan man 
väl|a mellan 8 olika spel¬ 
varianter. 4 varianter för 
1 spelare och 4 för 2 
spelare 

Äger du en Spectra¬ 
video och vill ha en va¬ 
riant av "Space Inva¬ 
ders" på din dator så 
skall du naturligtvis köpa 
"Spectron" Med sm väl¬ 



använda grafik är det en 
klart godkänd variant på 
marknaden 

Spectravideons joy- 
stick har en viss tendens 
att inte svara tillräckligt 
snabbt Detta gör spelet 
svårare än vad konstruk¬ 
tören antagligen hade 
tänkt sig. 

Själv tycker iag att 
man kunde vara lite mer 
originell spelskapandet 
För de flesta datorer 
finns det i dag original¬ 
spel som man inte kan 
hitta i spelhallar och på 
kafeer Jag hoppas att 
Spectravideoägarna in¬ 
te kommer att bli be¬ 
svikna i fortsättningen, 
Rec av Clas 


/K K K K K 

Distribution: Svenska 
Solt Service 
Maksin: Spectrum 
Typ: Kassett 

Ultimate Play the Game 
heter ett nytt spelföretag 
i England "Jet Pac" he¬ 
ter ett av deras första 
spel och håller alla spel 
denna standard får öv¬ 
riga företag att se upp 
Detta är ett av de bästa 
spel iag har sett 1 
Bara försättsbladet är 
ett halvt konstverk Jag 
kan bara inte fatta hur 
de har burit sig åt Gra¬ 
fiken är mjuk och smidig 
och l|uden ger en lagom 
spännande atmosfär åt 
spelet Detta låter ju gott 
och väl, men kan spel- 
idén leva upp till detta 
fornmässiga storverk Ja 
det tycker jag nog 
Du skall resa runt på 
främmande planeter och 
samla värdesaker och 
lådor med raketbränsle 
Vart du än kommer blir 
du anfallen av "Aliens" 
som av någon egen- 


Jet Pac” 


Sinclair ZX Spectrum 



iningpröYé- 
sterar mot din framfart 
genom atl attackera dig 
vilt. Detta fick mig att 
fundera lite runt begrep¬ 
pet xenofobi (främlings- 
skräck) Måste alla spel¬ 
fabrikanter utgå ifrån att 
varelser på andra pla¬ 
neter upplör sig lika 
aggressivt och irratio¬ 
nellt som vi människor? 
Inte undra på att E T 
längtade hem 
Nåväl Ultimate Play 
the Game ar inte en¬ 
samma om denna un¬ 
derliga inställning till 
andra raser Ingen skug¬ 
ga må falla över dem. 
Åtminstone mte nar dom 
gör så roliga spel som 
"Jet Pac" 

Rec av C/as 



”TransAm” 


K K K K 

Distribution: Svenska 
Solt Service 
Maskin: Spectrum 
Typ: Kassett 

Ofta har arkadspel på 
hemdatorer en liten an¬ 
strykning av rollspel Det 
är någon du skall iden¬ 
tifiera dig med, antingen 
en kapten på ett rymd¬ 
skepp eller en liten gro¬ 
da I "Trans Am" är du 
en bil med turbo 

Det hela utspelar sig i 
en okänd framtid etter 
den stora förintelsen då 
det enda som har över¬ 
levt våran civilisation är 
bilarna Inte nog med 
det oe har fått en viss 
intelligens, de är också 
på jakt efter ett antal 
pokaler som är spridda 
över den nordamerikan¬ 
ska kontinenten 

"Trans Am" är tillver¬ 
kat av Ultimate Play the 
Game och därför är det 
ett välgjort spel Inga 
löss i programmet och 
prydlig grafik. Scenariot 
är Ilte otäckt Det känns 



inte speciellt upplyftan¬ 
de att tänka sig en fram¬ 
tid där alla djur inklu¬ 
sive människan är för¬ 
svunna tack vare vår 
inbyggda förmåga att 
utplåna oss s|älva Men 
man kan ju hoppas att 
"Trans Am" fungerar 
som en varning 

Spelel är roligt, myc¬ 
ket roligt till och med 
Det påminner lite grann 
om arkadspelet där du 
skall jaga flaggor i en 
labyrint, fast utan laby¬ 
rint den här gången. 

Själv har jag, trots 
ihärdigt spelande, bara 
lyckats plocka åt mig 
tre, fyra pokaler innan 
bensinen tagit slut 

Rec av Clas 



”Frantic 

Freddy” 


K K K 

Distribution: Ronex 
Maskin: Spectravideo 
Typ: Cartridge 

Det brinner i hyres¬ 
huset Freddy står på 
gatan och försöker släc¬ 
ka elden Under tiden så 
håller kattungar på att 
fly genom fönstren, des¬ 
sa skall Freddy fånga 
När han har lyckats 
släcka alla eldarna och 
samtidigt lyckats ducka 
för alla nedfallande gnis¬ 
tor kommer en svårare 
uppgift Han skall nu 
klättra uppför stupröret 
till elden och släcka 
eldhärdarna. 

Detta är ett typisk 
mellanspel Det är lagom 
svårt, lagom snygg gra¬ 
fik och lagom spännan¬ 
de Dessutom spelar 
datorn en melodi hela 
tiden som till slut blir 
ganska tjatig. 

Tack och lov tinns det 
en volymkontroll på TV:n 
så att man kan stänga 
av Men man har ju inte 
ljud i sin dator för att 



ra* im wtTMwmo 

SV 318/SV 328 


kunna stånga av def.. 

Det finns inte mycket 
man kan klaga på när 
det gäller "Frantic Fred¬ 
dy" Men å andra sidan 
finns det inget som gör 
det till ett spel som man 
ser fram emot att få 
spela fler gånger Det är 
så förutsägbart att man, 
när man har lärt sig tek¬ 
niken och strategin, näs¬ 
tan skulle kunna spela 
det med förbundna ö- 
gon. 

Men pröva själv. Min 
smak kanske inte öve- 
renstämmer med din 

Rec av Clas 


”Catcha 

Troopa” 


K K 

Distributör: 

Maskin: VIC-20 
Typ: Kassett 

Här är ett spel som 
går ut på att rädda 
fallskärmshoppare som 
landar i vattnet Du skall 
med din båt försöka fånga 
dem innan de hamnar i 
vattnet. Om en fallskärms¬ 
hoppare hamnar i vattnet 
kan du lägga ut en stege 
och på så vis få upp 
honom i båten Om du 
inte snabbt tar upp någon 
som hamnat i vattnet så 
blir han uppäten av haien 
som gingt simmmar fram 
och tillbaka bland vå¬ 
gorna. Du lår hålla på 
att rädda liv tills dess att 
fem hoppare blivit upp¬ 
ätna Ju längre tid du 
håller på |U tätare kommer 
hopparna ut från heli¬ 
koptern och då räcker 
båtens hastighet mte till 

Spelets ljudeffekter är 
mte speciellt bra och 
vågorna ser löjliga ut 
Spelet är lätt att tröttna 



på då det är likadant 
hela tiden. 

Daniel 
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Mega- 

Galactic” 


K K K K 

Distribution: Oatamaxx 
Maskin: VIC 20 
Typ: Kassett 

Du är en lama och 
skall spotta på spindlarna 
som klättrar ner mot dig 
trån skyn! Laman spottar 
snett uppåt 
och år de håll som den 
tittar Loskan studsar mot 
väggarna och mot 
en energiskärm som du 
sfälv kan flytta uppåt 
och nedåt Om du trätfar 
en spindel så dör den 
på fläcken och du får 
poäng Om en spindel 
klättrar ner på marken 
eller om du spottar på 
tråden så att den ramlar 
ner förvandlas den till 
en mask som slingrar 
sig mot dig Enda 
chansen att bli av med 
masken är att studsa en 
loska så alt den trälfar 
masken på mar¬ 
ken (svårt 1 ) 

Riktigt hetsigt blir det 
av att nästa spindel redan 
är på väg ner Om en 
spindel klättrar ner på 



dig eller om en mask 
slingrar sig på dig dör 
en av dina tre lamor 
Om du spottar på till¬ 
räckligt många spindlar 
ökas svårighetsgraden 
men kan även väljas i 
börian av spelet 
Spelet har god klass 
på grafiken och myckel 
bra ljud 
Daniel 


*’Cross 

Forece” 


K K K K 

Distribution: Ronex 
Maskin: Spectravidso 
Typ: Kassett 

Det verkar inte som 
om Spectravideoägarna 
kommer att lida någon 
brist på mjukvara Ett 
otal spel och nyttopro- 
gram finns att tillgå på 
marknaden och natur¬ 
ligtvis de obligatoriska 
rymdstridsvarianterna. 

I "Cross Force” har 
du två stridsstationer 
som kan sända en dödlig 
stråle mellan sig. Man 
kan välja mellan olika 
varianter av spel I bägge 
fallen ligger bägge sta¬ 
tionerna i över- respek¬ 
tive underkanten Du 
kan sen välja om du vill 
atl de skall flytta sig i 
motsatt eller samma rikt¬ 
ning. Med h|älp av en 
extra joystick kan två 
spelare välja en station 
var 

Detta är ett mycket 
underhållande spel T rots 
att grundtanken är gam¬ 
mal har man lagt till en 




Park eri ngs- 
Terror” 


mängd nya faktorer som 
gör atl spelet känns 
fräschl. Speciellt knepigt 
var det när UFO:s skic¬ 
kade sina bomber uppåt 
Grafiken är som van¬ 
ligt när det gäller Spec- 
travideospel godkänd 
men inte mer Men den 
som har komponerat 
ljudet har lyckats med 
att skapa en spännande 
atmosfär 

Rec av Clas 


K K K K 


Distributör: Byte Flight 


Maskin: VIC 20 

Bv. JjSN 

Typ: Kassett 

Hoppsan' Har någon 

NK* ■■II*, v.s. 1 'MÄ 

byggt in sprites i VIC- 
20? Det ser taktiskt så 


ut i detta svensktillver¬ 

‘Z&vfcf ■- V' -‘tr . 

kade spel om bilister¬ 


nas elände 


Du måste springa om¬ 


kring på gatorna och 


samla småslantar tills 
du får ihop en krona 


som kan betala parkenngs- 
avgiften med. Lapp¬ 
lisorna |agar dig och du 
får inte låta dem ta dig 
för då blir en av dina tre 
bilister in • 
spärrade Nar alla fyra 
lapplisorna har lämnat 
sitt fikarum och gått ut 
på jakt måste du snabbt 
lägga enkronan på par- 
kermgsmätaren 
Spelet styrs med joy¬ 
stick och på något sätt 
känns det knixigt i 
början, men när man väl 
spelal ett tag verkar 
styrningen perfekt. Jag 
måste erkänna att liudet 



kunde varit mer fantasi¬ 
rikt, men de olika figu¬ 
rerna rör sig väldigt sny¬ 
ggt. de liksom flyter 
fram 

Spelidén känns igen 
från Pac-Man som nu 
kanns lite utslitet och 
det är tack vare det och 
det alldagliga ljudet 
som spelet inte får en 
femma 
Daniel 



ZZOOM” 


K K K K K 

Distribution: Datamaxx 
Maskin: Spectrum 
Typ: Kassett 

Man kan undra vem 
som sätter namn på spe¬ 
len Ett mer intetsägande 
namn än 'Zzoom'' får 
man leta efter' 

Del är synd. för Zzoom 
är ett bra spel, mycket 
bra till och med Även 
sett ur den synvinkel att 
man bogar bli bortskämd 
med super bra spel för 
Spectrum Spelidén är 
föliande. 

Du är pilot på ett flyg¬ 
plan och ditt uppdrag ar 
att rädda flyktingar un¬ 
dan besk|utning ifrån fi¬ 
endens flygplan, tanks 
och ubåtar Detta skall 
du göra genom att pricka 
ned så många fiender 
som möjligt Problemet 
är bara att flyktingarna 
oftast har en viss för¬ 
måga att springa i vagen 
för dina skott Allt detta 
utspelas genom ett fön¬ 
ster på skärmen och i 
den mest verklighetstrog¬ 



na 3D som iag hittills 
sett i något spel 
En mycket makaber 
detal| i sammanhanget 
är att när en flykting blir 
Iräffad av en bomb eller 
liknande så ser man hur 
han kastas ett par meter 
upp i luften av explo¬ 
sionen! 

Efter att ha klarat för¬ 
sta skärmen dyker ytter¬ 
ligare skärmar upp och 
miljöerna växlar trån 
slätt till öken till hav... 
Spelet går snabbt och 
figurernas rörelser är 
mjuka och behagliga 
Del är lagom svårt så 
att man inte tappar in¬ 
tresset Ett bra spel 

Rec av Clas 


'Clown” 


K K K K 

Distribution: Handic 
Maskin: VIC 64 
Typ: Cartridge 

Ett spel från spelhal¬ 
larnas barndom Än en 
gång har Bally/Midway 
gjort ett fint spel Här 
gäller det att med hjälp 
av två clowner smälla 
ballonger 

Du styr ett hoppbräde 
och på denna står en 
clown Den andra clow¬ 
nen befinner sig i luften. 
Det gäller att passa in 
brädet så att clownen 
som är på väg ner ham¬ 
nar på brädet och se till 
att clownen far så högt 
upp som möjligt. 

Ballongerna består av 
tre skikt Gula som ger 
20 poäng och när man 
klarat av en hel rad 200 
poäng i bonus Gröna 
ger 50 poäng och 500 i 
bonus och slutligen blåa 
som ger 100 poäng och 
1000 i bonus plus ett 
extra hopp Man bogar 
med 5 hopp Vage gång 
du hoppar på brädan får 




”Night 

Driver” 


K K 


du 10 poäng. Ju mer 
ballonger du träffar des¬ 
to snabbare går det Ef¬ 
ter ett tag går det på tok 
tör fort 

En tråkig sak är att 
spelet kräver paddlar. 
Förutom denna nackdel 
ar spelet mycket trevligt 
även om det kan vara 
väl svårt efter ett tag 
Slutligen skall väl sägas 
att detta spel har gratik 
och ljud som är vida 
överlägset originalet 

Rec av Mikael 


Distribution: Handic 
Maskin: VIC-64 
Typ: Cartridge 

Spelet som finns till 
de flesta datorer och 
TV-spel 64:ans variant 
är mest lik VIC-20:os 
med den skillnaden att 
ljud och gratik är bättre 

Din uppgift är att köra 
en automatväxlad bil så 
långt som möjligt. Låter 
det enkelt? Tänk då på 
att vägen är krokig och 
tvära girar är nödvän¬ 
diga för att inte krascha 
ditt vrålåk Du kör dess¬ 
utom mot tiden På bilen 
finns det bara tre saker 
att hålla reda på, höger, 
vänster och gasen. Lju¬ 
det är mycket realistiskt 
både vid acceleration 
och kraschar 

Spelet är inget utöver 
det vanliga och blir rätt 
så fort tråkigt Man kan 
vänta mer av en dyr 
cartridge. Det vore bätt¬ 
re om man la ett sådant 
här spel på kassett och 
därigenom fick ett lägre 



pris Som spel till ett TV- 
spel duger det kanske, 
men till en dator kan 
man törvänta sig mer 
Rec. av Mikael 
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'Cosmic 

Invaders” 


K K K K 


Maskin: Dragon 
Typ: Cartridge 

Att detta är ett "Space 
Invaders "-spel hal väl 
ingen undgått att fatta 
av titeln. Tja, varför skulle 
Dragonägarna inte ha 
rätt att spela "Invaders" 
på sina datorer 

Detta är ett mycket 
typiskt Tnvaders-spel" 
varken bättre eller sämre 
än de övriga som finns 
på marknaden Jag blev 
själv förvånad när jag 
upptäckte hur mycket 
tid jag la ned på att 
spela den här varianten 
Det kan möjligtvis bero 
på att spelet är mycket 
lättspelat 

Det har 15 olika svå¬ 
righetsgrader och på ni¬ 
vå nummer 1 är det inte 
ovanligt att man klarar 
av 4-6 skärmar innan 
sista skeppet blir ned¬ 
skjutet. På nivå nummer 
15 kan man oftast klara 
av 1 skärm innan det 
börjar osa bränt. Så min 




största invändning mot 
det här spelet är att del 
är allt för enkelt 
Men grafiken är mjuk 
och fin och ljudet har 
den rätta "Invaderska- 
raktären" Jag tror tak¬ 
tiskt att detta kan vara 
ett lämpligt spel för även 
den icke "Invaders-bit- 
ne" Det är i alla fall det 
bästa arkadspel jag hit¬ 
tills har sett på Dragon 
Rec av Clas 


”Cosmic 

Break” 


K K K K 

Distribution: Handic 
Maskin: VIC-20 
Typ: Cartridge 

En vidareutveckling på 
temat "Space Inva¬ 
ders" 

T re "Invaders" har blivit 
inburade i en tegel¬ 
byggnad och tjugosex 
vänner till dem försöker 
plocka ned fängelsel i 
småbitar och frita dem 
Om du skjuter ner en 
" Invader" innan han har 
hunnit springa bort 
med tegelstenen han tagit 
så dör han. och puff så 
finns stenen på plats 
igen! 

Om en av fångarna 
lyckas komma undan eller 
om du blir träffad av en 
bomb, blir du av med ett 
av dina tre lasertorn Om 
du klarar av att skjuta 
ned alla t|ugosex kommer 
lika många nya igen 
Dessutom kommer ett 
rymdskepp som är myc¬ 
ket svårt att sk|uta ner 
att ställa sig ovanfor dig 
så at du inte kan skjuta 




SeaBattle’ 


ned några "Invaders" 
förrän det är utplånat 
Ibland kan alla figu¬ 
rerna utom en stanna 
av men denna rör sig då 
desto snabbare. Då gäller 
det att vara snabbkytt 
för annars år en fånge 
snart fritagen 
Grafiken är godkänd 
och visst känns figurerna 
och ljudeffekter igen trån 
det vanliga "Invaders" 
Tydligen skall det spelet 
ej talla i glömska än på 
ett bra tag. 

Daniel 


K K K K 

Distribution: Handic 
Maskin: VIC-64 
Typ: Cartridge 

En samproduktion mel¬ 
lan Commodore och 
speljatten Bally/Midway 
Det är spelhallspelet 
"Sea Wolf som giorts 
om för att passa 64 an 

Spelet har mycket fin 
animering och ljudet är 
bra Som i många andra 
spel går detta ut på att 
skjuta, härpå båtar Tre 
olika båttyper kryssare, 
patrullbåt och lastfartyg 
är målen Bildskärmen 
är delad i fyra delar alla 
med olika färger Den 
övre delen visar din och 
din motståndares poäng 
samt Hi-score Andra 
delen är där båtarna 
kommer åkande, tredje 
delen innehåller minor 
som man inte skall skjuta 
på Minorna ger inga 
poäng och man förlorar 
bara en torped 

Den undre delen visar 
din och din motstån¬ 
dares ubåt samt hur 



många torpeder som är 
kvar plus den återståen¬ 
de tiden När spelet bör¬ 
jar tilldelas man fyra 
torpeder och nar dessa 
tar slut tar det tre minu¬ 
ter att ladda nya 
Patrullbåten ger 1000 
poäng, kryssaren och 
(lastfartyget 200 Givet¬ 
vis är patrullbåten svå¬ 
rast att träffa eftersom 
den går fortast, dess¬ 
utom kommer den inte 
lika ofta än de andra 
båtarna Bra är att man 
kan spela två 

Rec,av Mikael 



'Super 

Alien” 


K K K 


Distribution: Handic 
Maskin: VIC-64 
Typ: Cartridge 

Rymdspelens stålfar¬ 
far " Space Invaders" 
finns nu till 64:an under 
namnet "Super Alien" 
Här verkar det som pro¬ 
grammakarna varit lite 
lata och bara konver¬ 
terat VIC-20 varianten 
Spelet använder inte 
hela skärmen detta gör 
att spelplanen blir liten 
och plottrig 

Temat "Space Inva¬ 
ders" har inget kvar att 
ge. 64:ans version är 
trots allt ett av det bättre 
iag sett. Att slösa ord på 
vad spelet går ut på tyc¬ 
ker iag inte behövs Ljud¬ 
effekterna är bra och 
grafiken fm. För den in- 
bilne "Space Invaders" 
-spelaren är det något 
att satsa på men det 
finns många både bättre 
och roligare spel 

Rec. av Mikael 




Hustler” 


K K K K 


Distribution: Oatamaxx 
Maskin: VIC-64 
Typ. Band 

Biljard på datorn? Ja. 
nu finns det en variant 
på 64:an. Spelet är e- 
gentligen 6 spel i ett, tre 
olika spel för en spelare 
och tre för två spelare 
När programmet kör 
igång kommer titeln blin¬ 
kande i olika färger sam¬ 
tidigt som en av Scott 
Joplins låtar spelas i tre 
stämmor, mycket impo¬ 
nerande Nu väljer man 
något av de 6 alterna¬ 
tiven och spelet kan 
börja. 

Bollarna placeras ut 
på bordet och nu kan du 
styra runt ett litet sikte 
med hjälp av |oysticken 
eller tangenterna När 
detta är gjort väljer man 
hastighet på bollen Bol¬ 
larna består av spritar 
och åker mjukt och 
snyggt på skärmen, men 
det går tyvärr inte att 
skruva en boll 



Grafik och ljud är av 
mycket hög klass, spelet 
tar lång tid att spela 

Rec av Mikael 


'Jumpman 


K K K K K 

Distribution: Grana 
Maskin: VIC-64 
Typ: Kassett 

Ett super-spel med 
hela 30 olika kartor' Al¬ 
drig har jag sett ett så 
välgjort och omväxlande 
spel Det enda som inte 
är super är grafiken 
Även om spritar är livligt 
använda så blir inte gra¬ 
fiken så professionell 
som det övriga L|udet 
är t ex helt ofattbart bra 

Spelidén bygger på att 
du skall rädda det ju- 
peteriska högkvarteret 
från undergång Själv 
spelar du rollen som 
"Jupiter Jumpman" Du 
skall hoppa, klättra, flyga 
genom det 30 sektorer 
stora Jupeteriska Hög¬ 
kvarteret på jakt efter 
bomber utplacerade av 
elaka fiender Under 
tiden viner det kulor runt 
dig och ibland kommer 
det värmesökande flad¬ 
dermöss Det gäller att 
springa och hoppa för 
att klara livhanken. På 



en karta måste du du¬ 
ellera med två revolver¬ 
män och naturligtvis så 
förekommer också en 
drake i spelet 
Programmet ar skrivet 
helt i maskinkod och är 
på hela 25 K 
32 svårighetsgrader 
finns att välja mellan, 
detta gör att man aldrig 
tröttnar 

Rec av Mikael 
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SPECTRUM 

Program 48K 

Äventyrsspel från Richard 
Shephard. Bl.a. T ranssylv. T ower, 
Everest Ascent Super Spy, Invin- 
cible Island, m.m. 95 kr. st. inkl. 
porto. Bet. på pg 4414856-7. 
Göran Andréason 08-765 71 91, 
eft. 19.00. 


ÄNTLIGEN! 


KLUBBEN FÖR DIG 

Är du ägare av en SPECTR A- 
VIDEO, SPECTRUM, 
VIC-20 eller VIC-64 kan vi 
bl a erbjuda dig möjligheten 
att byta ut dina gamla dataspel 
mot ”nya” dataspel. 

För vidare information beställ 
gratis material från: 

□AT ATRADE 

Box 5506 200 72 MALMÖ 
PS: Glöm ej uppge vilken 
dator du har. 


Datakassetter 
Högsta kvalité 
till fabrikspriser! 


SUPER FERRO (TYP 1) 


C 5 2x2'/» 
C 10 2x5 
C 15 2 x 7V, 
C 20 2x 10 
C 25 2X12V, 
C 30 2x15 
C 60 2x30 
C 90 2x45 
C120 2 x 60 


Min. 7.30/st 
Min. 7.45/st 
Min. 7.70/st 
Min. 8.15/st 
Min. B.50/st 
Min. 8.85/st 
Min. 10.95/st 
Min. 13.70/st 
Min. 18.90/st 


Priserna galler vid 80p av 20 st 
av en Idngd. Mindre an 20 st 
tillagg 1: — /st. Moms ingår. 

Vid köp av 100 kassetter 

FRAKTFRITT!!! 


DISKETTER TILL LÅGPRIS! 

BASF FLEXY DISK 5,25 
48 TPI (40 Spår) 

IX SS/SD 25:—/st 

ID SS/DD 31:—/st 

2D DS/DD 35:—/st 

96 TPI (77/80 Spår) 

1/96 SS/DD 34:—/st 

2/96 DS/DD 43:—/st 

Priserna galler vid köp av 5 st I 
beteckning. Moms ingår. 

Porto 16:— tillkommer/leve¬ 
rans. Betala till postgiro 
17 63 25-9 eller sänd check. 
Full garanti på fabrlkatlons- 
och materialfel. 

KLM TRADING, 430 31 ÅSA 

0340-561 90 även kvällar och 
helger. 


MicroSolver 

serien. 

Pascal 

HiSofts berömda kompilator 
är mycket snabb och kraftfull 
med en suverän texteditor. 
Ska du bara ha ett extra språk 
till din Spectrum måste det bli 
Pascal Prova 1 Du kommer 
inte att ångra dig 48 K 

Basic 

Enligt test i PCW den bästa 
basic kompilatorn till Spectrum. 
Många nya kommadon. Får 
dina basic program att löpa 
maskmkodshastighet. Så varför 
inte vänta längre än nödvän¬ 
digt? 16/48K Spectrum. 

Forth 

Två kompilatorer till priset av 
en. En 48 K med flyttal och en 
till 16 K Spectrum. Enkelheten 
hos Basic med snabbheten 
hos maskinkod. Komplett och 
uttökad FORTH-79 standard 
på 48 K varianten. 

Super Fi le 

Första databasen till Spectrum 
med alla menyer, utförlig ma¬ 
nual och exempelfil på svens¬ 
ka. Svenska tecken (åäö, ÅÄÖ). 
Ett avancerat databassystem 
med betydligt större möjligheter 
än VU-file t.ex. 48 K. 

Assembler 

Disassembler 

Den enligt engelsa tester bästa 
assemblern och disassemblern 
till Spectrum heter Decpac 
och kommer också från Hisoft. 
Och varför ska du nöja dig 
med mindre än det bästa? 
Helt komplett. 16/48 K. 

Sys 64 

SYS64 ger dm Spectrum 64 
tecken per rad med dm vanliga 
TV. Nu ryms dina tabeller och 
långa programrader. En bättre 
dator helt enkelt. 16/48 K. 

Du känner igen alla MicroSolver 
originalprogram på att de är 
förpackade i en kraftig pärm. 
Se till att du får MicroSolver' 
MicroSolver säljs av ledande 
Spectrumåterförsäljare. Micro¬ 
Solver program för VIC finns 
snart i din butik. 

Hot Line spelprogram och hård¬ 
vara samt MicroSolver nytto- 
program marknadsföres av 

D1GILOG 

Box 5110.402 23 GÖTEBORG 
Tel: 031/20 29 00 


r 



Äntligen 
kan Du få nytta av 
din hemdator 


\ 


Practicalc är ett kalkylprogram till VIC 20 och VIC 64. 
Practicalc gör din hemdator till ett professionellt verktyg, 
med samma möjligheter som en kontorsdator. 

Med Practicalc gör du snabbt och enkelt huskalkyler, 
budget, prisjämförelser eller Din deklaration. Du gör 
beräkning till Ditt modellflygplan eller hanterar Din 
aktieportfölj. Du kan enkelt ställa 'Vad händer om' 
frågor och få svar direkt. 

Practicalc har över 20 matematiska och statistiska funk¬ 
tioner liksom maximum, minimum och medelvärde i rad 
eller kolumn. Practicalc sorterar både siffror och bok¬ 
stäver, fram eller baklänges. Med funktionen Search 
hittar Du enkelt tal eller ord i en stor kalkyl. Funktioner 
som Insert, Delete, Replicate och Move gör det lätt att 
konstruera stora kalkyler. Du kan spara dina kalkyler på 
disk eller kassett. Utskrift kan göras på skrivare. 

Practicalc finns i två versioner. Practicalc-F till VIC 20 
(kräver minst 16 Kb extra minne) och Practicalc 64 till 
VIC 64. Practicalc-F kostar på kasett 375,- inkl. moms och 
på disk 435,- inkl. moms. Practicalc 64 kostar på kassett 
495,-inkl. moms och på disk 555,- inkl. moms. Jämför 
gärna med andra liknande program. Då är det enkelt att 
se vilket program som är det bästa köpet. Programmet 
kan Du köpa hos välsorterade återförsäljare eller direkt 
från oss. 


Ja, Practicalc verkar intressant. Sänd mer information. 


Namn 

Adress 


Postadress 
Telefon _ 


Privatperson □ Återförsäljare □ 


Sänd kupongen till: 
Programdistributören, 

Box 3009, 58003 Linköping 
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AV. PATRIK THELANDER ILLUSTRATION: KJELL LINSKI 


SPACE-ATTACK 


* 




• • • Patrik Thelander, en ung 
programmerare har gjort detta 
spel till Vic-20. Det är uppbyggt 
runt datasatser och använder 
definierad grafik och en maskin- 
kodsrutin. 

Patrik är 16 år och har haft sin 
Vic sedan december 1981, in¬ 
nan dess lekte han med en ABC 
80. Över 40 spel har han till¬ 
verkat och flera har han sålt till 
olika företag. Han säger att 8 
timmar i veckan tränar nan och 
bygger program. 

Detta spel som vi presenterar 
utspelar sig i rymden där ett 
stort rymdskepp släpper ner små 
anfallande skepp. Om du blir 
träffad eller går på ett sånt så 
dör du. Det gäller att skrapa 
ihop sä mycketpoäng som möj¬ 
ligt, och dessa får du genom att 
skjuta ner anfallande skepp som 
redan landat. Du skjuter åt sam¬ 
ma håll som du är på väg åt, 
och varje skott som träffar ett 
skepp, helt eller trasigt, ger ett 
poäng. 

Tempot ökar hela tiden och det 
blir allt omöjligare att klara sig. 
150 poäng och uppåt räknas 
som ett hyfsat resultat. 
Programförklaring: 

10-20 Sätter den normala tec¬ 
kenuppsättningen. Skriver ut in¬ 
formation om hur man styr. 

POJKE 2,16'' talar om för ma- 
skinkodsprogrammet varifrån 
det första anfallandet skeppet 
ska starta. 

30 Sänker minnespekarna och 
gör därmed plats för maskin- 
kodsprogrammet plus egna tec¬ 
ken, som lagras i minnet. "C= 
50" tilldelar C värdet 50, detta 
används i FOR-Next loopen på 
rad 95. A=30720" tilldelar A 
värdet 30720. Detta är mellan¬ 
skillnaden mellan färgminnet 
och skärmminnet och det an¬ 
vänds i raderna 40 och 50. 
40-60 Sätter teckenuppsättning¬ 
en för egna tecken. Ritar ut hur 
skärmen ska se ut och vilka olika 
färger den ska ha. "POKE 3,0" 


nollställer poängen. "POKE 
1,1" talar om för maskinkods- 
programmet att det första den 
ska göra är att skicka i väg ett 
anfallande skepp. 
70Ansoparmaskinkodsprogram- 
met, detta lägger olika värden i 
minnespositionerna 1 och 3. 
Sedan känns dessa av i raderna 
70-90. Här undersöks om min- 
nespostion 1 innhåller värdet 1, 
om den gör det betyder det att 
skeppet nar landat och nästa 
ska starta. Därför lagras ett 
slumpmässigt värde i minnes- 
position 2, och det anger alltså 
varifrån nästa skepp sira starta. 
80 Även denna rad känner av 
minnespositionen 1, men nu 
kollar datorn om den innehåller 
värdet 2. Detta gör den om 
man har blivit träffad av eller 
har gått in i ett anfallande skepp. 

I så fall skrivs "GAME OVER" ut 
på skärmen och programmet 
noppar till 230. 

90 Denna rad känner av inne¬ 
hållet i minnesposition 3 har 
ökat sedan förra gången. Om 
det gjorts betyder det att man 
har fått in en träff och poängen 
ökar med 1, den nya poängen 
skrivs ut och det spelas en kort 
ton. 

95 Här är en liten paus som 
bara blir kortare och kortare 
varje gång som programkör¬ 
ningen kommer hit, vilket gör 
att skeppen anfaller med högre 
och högre hastighet. Därefter 
hoppar programmet till rad 70 
för att åter igen anropa maskin- 
kodsprogrammet o.s.v. 

100-200 Här ligger maskinkods- 
programmet i DAT A-satser som 
av rad 30 lagrades i minnet. 
Detta skickar iväg små anfallan¬ 
de skepp och känner efter om 
man vill flytta sitt skepp. Orsaken 
till att jag skrivit en del i maskin¬ 
kod är att detta är mycket snab¬ 
bare än Basic. När program¬ 
met exekveras snabbare blir det 
mycket svårare att spela, och 
det är ju meningen med de flesta 
spel. Alla nollorna på slutet av 


rad 200 är till för att fylla ut 
utrymmet mellan maskinkods- 
programmet och de egengjor- 
da tecknen. 

210-220 Här ligger alltså de 
tecken som används i program¬ 
met (anfallande skepp, eget 
skepp m.m.). Också dessa la¬ 
gras i minnet av rad 30. 

230 Hit hoppar programmet om 
man har gått in i eller blivit 
träffad av ett anfallande skepp. 
En ljudeffekt spelas upp och 
programmet startar från början 
igen. • 



4 


t 



10 POKE36869.240 PRINT"HWsMAWa£PRCE-RTTRCKr PRINT“*««TVR MED 'B' OCH 'N'" P 
0KE2-16 

20 PPINTIMKH SKJUT MED 'SHIFT " PPINT''PATRIK" PRINT"ikVATAISTHELAH 
DER” 

30 P0KE56,28 P0KE52.28 CLR P0KE36879.11 F0RX«7168T07463 RERDV POKEX,V NEXT 0=307 
20 C=50 

40 P0KE36869.2S5 FORX=7680TO?943 POKEX,36 POKEX-ffl.6 NEXT F0RX-8164T08185 POKEX.2 
48 

?0 P0KEX+A,5 NEXT P0KE8164,206 P0KE8185.205 F0RX*3S664T638883 P0KEX,2 NEXT P0KE3 
6878-15 

60 P0KE8151 , 33 P0KE3 • 0 POKE 1.1 PR I NT * m “PRI NT" / 

70 SVS7312 SYS7168 IFPEEK<l>«lTHEMP0KE36875.29e PQKE2. INT< RNDU ;*20+8; P0KE36875 
• 0 

80 IFPEEKT1 »*2THENPRINT 1 JStWrWClI^ OVER” G0T0238 

90 IFPEEK<'3X>DTHENPOKE36876,200 B=B*1 PRINT"1W:1I:F0RN0 "•£ D=PEEKC3) P0KE36876, 
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0 

95 C=C-.l FORX“!TOCI*XT GO7O70 

100 0878165,197,201,64,240.61,160,32.32,227,28.174,228.28,281,28,208,11,224.226. 
240,22 

110 D87823S.228,28.162»1,132,0,201,35,288,11,224,207.240,7.206.228,28»160,2,132, 
0,174 

120 8070228,28-142,51.28,173,0.31,281,32,248,5,162,2,134,1,96.160,33,32.227,28.1 
73,141 

130 D0T02.201,1,248,1,96,174,228,28,142,238,28,164.0,192,2-208.4,202-76-92,28.23 
2-234 

140 0878234,234,234,234,224,206.208,1,96,224,227.208.1-96.142.111,28,172.0,31,14 

2 • 238 

150D0T028,192,32,240,18.192.35.208,2,168.32,192.34,208.2.160,35.32,237,28,230.3 
.96-234 

160 D0T0234,234,76,81,28.162.12,32.141,234.165.1 201,0 248 28,165.2.141,232.28,1 


W • c. TO 

170 007032,231,28.233.232.28.238.232,28.160.285.32.231-28,206,232.28.169,8-133,1 
,173 

180 0878232.28.24,105.22.141,193.28.174,0,31,224,248,208,5,169,1.133.1,96.224,33 
.208,5 

190 D07R169.2.133.1,96,160.32.32.231.28.141.232.28,168.34,32,231.28.96,140,215,3 
1 -96 

200'd070140,0,31,96.160,195.140,0,31,96,0.0.0.0.0,0,0,0,0.0»@.0,0»0,0.0,0,0,0'@' 

0 , 0.0 

210 887824.36,66.195,255,255.126.8,24,60.60,255.189,189,153,129.0.0,130,66,34,11 
4,250 

220 0878190,255.255.255.255,255.255,255.255 

230 F0RX-2557O12737EP-1POKE36874.X MEX7 FORX-.07O3080 NEX7 PIJN 
PE80V. 
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• • • Det är tidig morg¬ 
on, du gränslar din motor¬ 
cykel. Vägen sträcker ut 
sig framför dig. Den är rak 
och fin. Där framme ser 
du vägen sakta svänger 
av åt vänster. Försiktigt går 
du in i kurvan och då ser 
du Gnurglor på vägen! 
Du börjar köra slalom mel¬ 
lan de små djuren. Då 
kommer nästa hinder, olje- 
fläckar. Någon har spillt 
olja på vägbanan. Din 
hastighet är nu så hög att 
du inte kan undvika olje- 
fläcken. Du får en sladd, 
men har turen på din sida 
och lyckas ta dig igenom 
utan problem. Du längtar 
efter målet 1000 meter 
längre fram. 

I speedway styr du motor¬ 
cykeln med tangenterna 


Rad: 

30-50 Initierar 
startbanan 
90-240 

Huvudprogrammet 
100 Ser till att skärmen 
"scrollar" vidare 
110-120 Slumpvis 
inplacering av hinder i 

130-140 Motorcykel¬ 
kontrollerna i bestämmer 
MC 

150-190 Utskrift av ny 
väg B$. C$ 

omdimensioneras för att 
200 varierar vägbanan. 
Om motorcykelns attribut 
inte är "INKO, PAPE 7", 
KRASH! 

210 Ritar ut ny 
motorcykel i kolumn MC. 
220 Suddar ut förra 
hindret. 

230 Varvräknare. Vid 


5 och 8. 5:an för dig åt 
vänster och 8:an åt höger. 
Motorcykeln ritas högst 
upp på skärmen och vä¬ 
gen scrollas fram på ned¬ 
re delen. På vägen ritas 
sen hinder ut i form av 
små djur som vi kallat för 
Gnurglor samt oljefläckar. 
Vid siaan av vägen före¬ 
kommer hus och Gnurg¬ 
lor. De har ingen bety¬ 
delse utan är bara pynt. 
Vägsträckan är 1000 ra¬ 
der lång och poängen är 
i heltalsäelen av 1 /tiden+ 
100. Oljefläckar ger sladd 
och Gnurglor ger dig tids¬ 
fördröjning. Skulle du köra 
av vägen så innebär detta 
också en tidsfördröjning. 
Tiden mäts av den inbyg¬ 
gda realtidsklockan. 


20 GO SUB 2000 
30 FOR k= 2 TO 22 
<10 PRINT ; ** 

T PhPER 7; ** 

50 NEXT * 

60 
70 
60 

SO REM 


1000 rader är du i mål. 
235 Ritar ut målet. 

240 Ta nästa vägbit. 

SUBRUTINER: 

1000 Definierar upp 
qrafiksymbolerna. 

2000 Initierar variabler. 
3000 Rutin för att se vad 
du kört på. 

4000 Rutin för 

poängberäkning. 

VARIABLER: 

B$ = Banan. Den vita 
vägsträckan. 

MC = Motorcykelns 
kolumn. 

O = CSs dimension, 
bestämmer B$s läge. 

C$ = Gräsmattan till 
vänster om banan. 

TID = Realtiden sen du 
började köra. 

SCORE = Dina poänq (- 
l/tid) 


PRIM 


100 PO KE 
110 IF RND>.9S THEN LET B* = " C 

115 IF RND>.95 THEN PRINT RT 21 
,RND*31,"O" 

116 IF RND..9S THEN PRINT RT 21 
,RNP»31, "C" 

120 IF RNP).9S THEN LET B» = " B 

,12g . IF varv =979 THEN LET et = ''K 

130 IF INKEY*="S” THEN LET m c=» 
C +1 

110 IF INKEY*="S" THEN LET u c =Kt 

C -1 

plSf^PRINT RT 21,0;C*;; PRINT PR 

160 LET D=D+IMT IRNO+3-1. . IF D 
>=26 THEN LET D=26 
170 IF D<=1 THEN LET D=1 
160 DIM C* ID) 

^190 PRINT ;C»; PRINT PRPER 7, B 

rttr IC,»c> OBIN 00111O0 
0 THEN GO SUB 3000 

R 2 1 0 .. PRINT 0, a c; OUER 1; prph 

220 LET B*=** 

0|^THEN T GO a TO = X00e**‘ 1: IF varv=10 
24-0 GD TO 200 
250 
260 

2000 REM 

EgR l ~f - f — i 

i§il E^d-r 0 to 7 

fo40 NEXT !f R CMR * 

3060 NEXT I 

^60° C ' RTR e>0,60,S0,24,24,139,2SS 
^126 IS™ 2 * • lse - . = 55 , 265,126 

1080 DRTR 24., 62,90,2SS , 62,24-, 36, 

24 ..126,2S5,129,129, 
läso^RETLiRN 

2000 BORDER 4 PRPER 4; LET *c=l 
0 LET LET 0=10 LET hIGH = 

S ?ér c» 110.; 

2030 LET vafVs0 

2040 FOR 1=0 TO 2: POKE 23672+1, 
0 NEXT l 

2050 RETURN_ 

3000 rem raragtiMu 

30 2 C IF FiTTR i I? , Ä C.' =32 OR RTTR \ 

e éSép’! 2 -iS EN R^5^ RT 

3 l*30f%ETURN (0 '“ C, * S ® THEN BEEP 
3030 IF RTTR 10,ac.=62 THEN BEEP 
R^TLIRN LET “ c =“ c+ I , 4T lRN0*7)-3: 

§?S§ gg#®*"™ ,0 ' mcj PPU * E » 

4.000 rem HWI 
4.002 PflUSE 100 
4.005 C-L S 

TID«*(PCEK 23672+256+PEE 
4«lå 6 ?24 2 f!H£2 E * PEEK 23674. .1 ySö 
4 0 !S rhf T Q ? C 2 R f l XNT 11 •'TID »10000.1 
tJRIGHT 1; FLRSH 
1» »OUR jCORE ;SCORE 

t|cORE F SCCIRE ' m ISH THEN LET HIGH 

^*HIGM INT RT ls ■ I®; "HIGH SCORE. 

4.S00 |NPUT “WILL DU SPELR IGEN?" 
^R* IF R*tl.l="j" THEN LET URRU = 

£|® 2 LET DIM C S (10.1 LET 

4503 LET d=10 

JE R *< !>="<■>" THEN STOP 

" 5 ?HEÄ F GO*-rå'isiS" RNP 

0 S1 NEXT B l 1=fil TD 2 23672+1, 

4S20 GO TO 30 

9990 REM g l JUl TW] 

llfl LET * =PEEK 2363S+2S6*PEEK 2 
lål? V ET new i ine=10 

Iil*THEN P ffSp* 2Se * P «* * > =1 
11IS £° KE meKlint/jsBi 

?S??ne°2l6? + 1 ,ne “ lir ’*-*se#iNT tr, 
§112 |-£J new i» 04=new11 ne+10 
EK 9 ?a+3T B=a ?4.+PEEK (a+2. +2S6+PE 
9999 GO TO 9994 
















Av Isak Engqvist 


x nno Person som tycker det ärte¬ 
rs 3 datorentusiasten Isak Engquist 
från Linköping. Han sänt in några fina 
spelprogram för ABC 80 till redaktionen 
Denna lovande unga man har arbetat 

™dABC80e,ip a ä rä,. ly ,ar'h a ?ha n 

L a 9 n h e9 ,* n (He ' Luxorl) men som fur är 
kan han låna en nar skaparlusten faller 

hanf L k ° mmer fistningar på två av 
are pro 9 ram Det ena har han 

d K° Sf^ d D' ° Ch det andra he,er 
att och Råtta Programmen är själv- 

instruerande (upper case skall lysa) 

s lut | igen en utmaning och ett upprop 

a n Vador I! ISa »? in,e upp er ' alla A BC 
80 Hackers ? Vi vet att ni finns i 

tusenta! ute i stugorna, har ni ingenting 

ABC°8099 n e t d eller skäms ni ,ör e? 

Cfr D ®f ar JU ändå den dator 

^om hittils sålt mest, och har störst 
spridning i Sverige. 

Det f |nns väi t ex , nte en enda s{u _ 
derande over 10 år som, ens om han 
undvika en ABC 80 i 

nakt» r t' S . å Vad ° r d6nna ( nastan ) kom¬ 
pakta tystnad? Varför kommer det t ex 

inga tips eller bidrag från ABC-klubben? 

Vi försöker ju sprida budskapet om 

speSJne?"" 9 '' 61 in,e ba,a som 

k a i a S'2 av egen er,aren het att man 
kan anvanda |ust ABC 80:an till så 
mycket annat än just spel. T.ex. soråk- 

orh m matema(ik ' kommunikation 
och mycket annat. 



eldatof 


10 i CHRBC12X)»’ INSTnNGD’ '• > TAB(9X)CHRo< 151X)' #**»»#*»»#»»***»» ’ 

20 i i ' 'Du och din motspelare ska stvra uarsin linje och försöka stansa in varandra. 
20 > 'Den som först sar pa en linje. vilken som helst» har förlorat.' 

40 i ! i ’ Ni styr era linjer mea «’ : » 

50 i • fi S 6 Ä’ 

60 I s I 'fl och ö svanger at vänster S och ä svänger at hoger’ 

70 » s > 'Skruva upp volymen !’:»:» 'Upper case ska LYSA !' 

30 I i I 'Fart (Höe / Mellan / Las> ?M i POKE 05013X<0<< : GET Tö 

90 UN INSTRAIX»’HhMmLl’< T»)+1X GOTO 10»100»100.110»110.120»120 
100 FX=58X : . • Hös’ : GOTO 120 
110 FX=125X : » ’ Mellan’ ! GOTO 120 
120 FX=200X : * ’ Las’ 

130 » : » : > 'Tryck pa RETURN nar ni ar redo»’» 

140 IF INP(56X)0141X 140 

150 i CHRO', 12X. : FOR IX=0X TO 23X : i CUR<IX.0 JOCHRb<151X>» : NEXT IX 
1Ö0 FOR IX=0X TO 71X : SETDOT IX.2X : SETDOT IX.79X : NEAT IX 
170 FOR IX=2X TO 79X i SETDOT 0X.IX ! SETDOT 71X»IX s NEXT IX 

130 RX=13X : KX=21X : R1X»18X : K1X=Ö0X : VX=3X : V1X=3X : WX=0X : ZX=0X : CX=0X 

190 REM-BÖRJA 

200 REM - FLYTTA VnNSTER SPELARE 

210 ON VX GOTO 220.230.240.250 

220 RX-RX-1X : IF DOT(RX.KX) CX=1X : GOTO 260 ELSE SETDOT RX.KX i GOTO 260 

220 KX=KX-1X i IF DOT<RX>KX> CX-1X i GOTO 260 ELSE SETDOT RX.KX i GOTO 260 

240 RX=RX+1X : IF DOT<. RX.KX) CX=1X i GOTO 260 ELSE SETDOT RX.KX : GOTO 260 

250 KX=KX+1X s IF DOT(RX.KX) CX= 1 X ELSE SETDOT RX.KX : GOTO 260 

260 REM-FLVTTfi HÖGER SPELARE 

270 ON V1X GOTO 280.290.200.210 

230 R1X-R1X-1X * IF DOT(R1X.K1X) 440 ELSE SETDOT R1X.K1X : GOTO 220 
290 K1X=K1X—IX : IF DOT(RIX.KIX) 440 ELSE SETDOT R1X.K1X : GOTO 328 
380 R1X=R1X+1X : IF DOT(RIX.KIX) 440 ELSE SETDOT R1X.K1X : GOTO 320 
210 K1X-K1X+1X : IF DOT(RIX.KIX) 440 ELSE SETDOT R1X.K1X : GOTO 220 
320 IF CX=1X 420 

330 REM-FöRDRoJNING 

240 FOR IX=1X TO FX : NEXT IX 

350 REM-KOLLA OM N«’N TRVCKER 

360 WX=INP<56X) : IF WX=ZX 200 ELSE IF WX<128X ZX=0X s GOTO 208 Fl SF 2X=WX 

370 IF WX=193X VX=VX+1X i IF VX>4X VX=1X 

380 IF WX=211X VX-VX-1X i IF VXC1X VX=4X 

290 IF WX=220X V1X=V1X+1X : IF V1X>4X V1X=1X 

480 IF WX=219X V1X=V1X-1X ! IF V1X<1X V1X=4X 

410 GOTO 200 

420 REM-VÄNSTER GICK PÄ 

420 IF RX=R1X AND KX-K1X SX=3X ELSE SX=1X : GOTO 460 
440 REM-HÖGER GICK Pft 

450 IF R1X=RX AND K1X=KX OR CX=1X SX=2X ELSE SX=2X i GOTO 460 

460 REM-STOPP SPEL 

470 ON SX GOSUB 520.560.590 

430 i CURC21X.8X)'Tryck RETURN för nytt spel'CHReK 151X)i 

490 » CUR«,22X.8X)'Tryck SPACE om ni vill Dyta fart ’CHRsX. 151X)i 

508 » CURC20X.25X)PX’ -’P1X 

518 IF INP(56X)0141X 520 ELSE 150 

520 IF INP<56X)0160X 510 ELSE 10 

520 P1X=P1X+1X : OUT 6X.249X s FOR 1=1 TO 200 : NEXT I : OUT 6X.0X 
540 i GUI? < 20X > 0X > ’ VÄNSTER GICK PÄ. ’CHRs<i51X)i 

550 RETURN 

568 PX=PX+1X s OUT 6X.251X i FOR 1=1 TO 300 i NEXT I : OUT 6X.0X 
570 ! CURC20X.0X)’HÖGER GICK PÄ. ’CHRö<151X)I 

530 RETURN 

590 OUT 6X.7X : FOR 1=1 TO 300 : NEXT I : OUT 6X.0X 

600 ! C’JR(20X>0X>’BäDA KROCKADE. OAVGJORT. 'CHRä(151X)> 

610 RETURN 































;B ujsoE 220 
20 RANDÖMilE 

20 f CMRfi(l2X)iCuRU2Xil27.>’GoR DIG BEREDD 

40 FOR IK=45®S TO &. 5TEP -II. : I CUft<14Xi l9X>FIXO;i,90X)tiX ! NEXT IF. 

50 REM III INITIERA + RITA SPELPLAN 

60 i 0*«U2X)i ! FOR «S=i:. TO 22X '• i CUR<XXi0X)iO(Ra(151X)i : NEXT XX 
70 R7.=34X i K7.=247. : R17.=427. i <1X=42X : P7.=ö:. 

80 ! CUR(10Xi 15X)i’Hooo’CUR(llXi 157.)')■■■' C0RC127.I15X)'*///’ 

80 FOR TX=IX TO 8007. 

100 REM III HUVuDlOOP 

110 IF INP(56X)>1277. AX=INP(5t7.) AND 1277. ELSE A7.=17. 

120 REM IM FLVTTA KATTEN 

100 IF A7.=727. IF K7.05X 180 ELSE FOR XX=RX-27. TO RXt27. : SETDOT X7.ik7.-47. 1 CLRDOT X7.iK7.ti7. ! NEXT x7. i K7.=K7.-1X 

140 IF A7.=857. IF R7.C=67. 180 ELSE FOR XX=K7.-27. TO KXtSX i SETDOT R7.-47.iX7. : CLRDOT R7.t27..X7. : NEXT X7. : R7.=R7.-1X 

150 IF AX=747. IF KX>*76X 180 ELSE FOR X7.=RX-27. TO R7.t2X : CLRDOT X7.iK7.-27. : SETDOT x7.iK7.t47. : NEXT XX l KX.=KX.tl7. 

160 IF A7.=737. IF RX>=687. 180 ELSE FOR X7.=K7.-2X TO K7.+2X : CLRDOT R7.-27.iX7. ! SETDOT R7.t47.iXX : NEXT XX i R7.=R7.tl7 

170 REM III FLVTTA RaTTAN 

180 ON FIX^4*RND)+1X GOTO 190i200.2101220 

180 CLRDOT RlXiKlX i K17.=K17.-17. ! GOTO 220 

200 CLRDOT RlXiKlX : KlX=K17.tlX : GOTO 220 

210 CLRDOT RlXiKlX ! RlX=RlXtlX : GOTO 220 

220 CLRDOT RlXiKlX : R17.=R1X-17. 

220 SETDOT RlXiKlX 

240 IF R1X>=71X CLRDOT RlXiKlX : R17.=R17.-17. 

250 IF R1X<=27. CLRDOT RlXiKlX : R17.=R17.tlX 
260 IF K1XW9X CLRDOT RlXiKlX ! K1X-K1X-IX 
278 IF K1X<=2X CLROOT RlXiKlX : KlX=KlX.tlX 

280 IF R1X>=R7.-2X AND RlX<=R7.t3X AND K1X7=K7.-2X AND KlX<=K7.t2X PX*P7.tlX 
290 i CURC0X.115X)iPXi ! NEXT TX 
200 GOTO 420 

210 REM III INSTRUKTIONER 


220 i 0*8(127.) i 

220 i’ KATT och RaTTA’ 

240 i 0*6(1517.)!’ »•*»»»*##»###»»»»#»»»**' 

250 i : ! 'DO SKA STVRA "KATTEN" OCH FöRSoKA FaNGA “RaTTAN". KATTEN AR DEN STORA FVRKANTEN.DEN STVR DU 'i 
260 i 'MED FÖLJANDE TANGENTER i> 

270 i ! i ’ U H J N 

280 i : I ’I RESPEKTIVE VÄDERSTRECK.' 

290 i i i 'Sa LaNGE DU LVCKAS STVRA KATTEN Sa ATT RaTTAN aR INNE I DENi FaR DO POaNG.’ 

400 i 'POaNGEN VISAS HELA TIDEN HöGST UPP.’ 

410 i : i ’DU FaR HaLLA Pä I DRVOT 20 sek. UNDER DEN TIDEN SKA DU AU.TSA SAMLA Sa MaNGA POaNG SOM MÖJLIGT.’ 
420 i : i 'TRVCK NaGONSTANS NaR DU aR REDO-’ ! POKE 65012Xi0X : GET To : RETURN 
420 i CUR<207. 1 0X> SPACEa (198X > i ! FOR I=1X TO 9997. : NEXT I : IF P7.2P17. THEN P17.=PX 



DO FICK’PX’ POÄNG. 


440 i CUR(217.i8X)ii 
450 80KE 65012Xi0X 
460 i : i 'VILL DU SPELA MER (J> ’! : GET Ta 
470 ON INSTRClXi’JjNn’+CHRö(l2X)iTa)+lX GOTO 440.20i20i480.480i20 
480 i CUR( 187.10) i s END -- 
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50 FANTASTISK A 

spel pa en kassett . SPECTRUM . VIC 20 
Pris endast 1 59:— inkl. moms. FRAKTFRITT 


Kassett 

¥4444 



fTTTT PRODUCTS 


SOFTWARE T«i. 04 1-261T60 


Bestall katalog 
P4 Pg 4381087-8 
eller mot 5:- 
i frimarken. 

Stort urval 


PODO-Product» 

Box 5085 

250 05 HELSINGBORG 



HEM-datorer, KONTORS-datorer 
CAD-System, Kringutrustning 


JÖNKÖPINGS DATAHUS AB 
BOX 21.551 12 JÖNKÖPING 
KYRKOGATAN 18, TEL 036-11 9555 



Oataband-proffskvalitét 

C-10 2x 5 min 8:45/st 

C-20 2x10 min 8:95/st 

C-30 2x15 min 9:25/st 

C-40 2x20 min 9:95/st 

C-50 2x25 min 10:25/st 

C-60 2x30 min 10:95/st 

Blanda gärna. Full garanti. 


ZX 81 SPECTRUM VIC 

SPECTRUM 16 K 1895 
SPECTRUM 48 K 2295 
32 K RAM 

SPECTRUM 495: 

ZX81 

GRUNDVERSION 795 
ZX81 inkl 16 K RAM 995 
16 K RAM t ZX81 395 
PRINTER ZX 795 


Böcker 


Extra papper 3 rullar 95:- 

Elektroniken i 


VIC 20 

1995:- 

Spectrum 

135:- 

VIC 20 pack inkl 


Upptäck Spectrums 


bandspelare 4 


Basic 

135:- 

program o. böcker 2395:- 

40 best 


16K RAM VIC20 

595:- 

Machinecoderutines 


CBM/VIC 64 

3495:- 

for Spectrum 

139:- 

VIC DRIVE 1541 

3795:- 

O ver the Spectrum 


Skrivare Seiskosha 


60 Games + 


GP 100 

3795:- 

Applications 

111:- 

Epromraderare 

995:- 

Mastering 


Machine Code & 


Machinecode ZX81 

139:- 

Better Basic 

135:- 

The Spectrum ROM 


Spela VIC (zap! 


Disassembly 

155:- 

powlboomlsvenska) 135:- 

The Ins & Outs Of 


The Working 


ZX81 

115:- 

Commodore 64 

115:- 


BESTÄLL VÅR MJUKVAROLISTA! 

Priser inkl moms. Frakt tillkommer endast på databand. 

MEMOTECH AB 

Box 25056 100 23 Stockholm Tel: 08-517740 dygnet runt 



Hem - Person - Fick 


DATORER 

FICKDATORER 

PC-1245 795:-inkl moms 

PC-1251 1.375:-inkl moms 

PC-1401 1.265:—inkt moms 

PC-1500 1.995:-inki moms 

PC-1500A 2.450:-,nki moms 

HEM- OCH 
PERSONDATORER 

MZ-721 3.950:-inkt moms 

MZ-80A 6.495:-inkt moms I 
MZ-80B 9.995:-inkt moms I 

KONTORSMASKIN 

ADDO 

PC-3201 komplett med 
Dator, Bildskärm, 
Flexskivminne och 
skrivare. 

19.780:— exkl moms 

TILLBEHÖR SHARP 

Matrisskrivare 
Flexskivminne 
Färgplottrar 
RS-232 interface 
Centronics interface 
Sattco interface 

PROGRAMVARA 

Stort urval av program 
för administrativa ruti¬ 
ner, utbildning, spel m.m. 


Beställ vår program¬ 
katalog! 



Box 16 

127 21 SKÄRHOLMEN 
Tel. 08-71005 55 


□ Kontakta mig 
J Skicka info om 


Namn:_ 

Foretag:_ 

Adress:_ 

Postadress: 
Tel. nr: _ 

V 


J 



BOKFÖRINGS- 
PROGRAM TILL 


VI&G4 



Ett program så genom¬ 
arbetat och enkelt att 
det faktiskt gör rutinar¬ 
betet trevligt. 

Dessutom är det säkert! 
Varje inmatad uppgift 
kontrolleras av program¬ 
met och vid felaktig form 
spärras inmatningen. 

Efter en registrering av 

transaktionerna 

erhålles.. 


DAGBOK 


N 


HUVUDBOK 


n 


SALDOBALANS 


RESULTATRAPPORT 


kr 


I PROGRAMMET FINNS 
AVEN BOKSLUTSRUTINER 

TILL BRA 
PAKETPRISER 



B UT JKEN 


Tel. 060/11 08 00 

SJÖGATAN 7. K2 13 SUNDSVALL 
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Nu får du som är medlem i AoH- 
lclubb ett unikt erbjudande. Du 
kan genom klubben köpa 
äventyrsspelet ”Black Gnome” 
och våra listade program från 
nummer 1-3 samlade på kassett. 
Vi har samlat VIC-20 och VIC-64 
programmen på en kassett och 
Spectruinprogrammen på en 
annan. 

Black Gnome är skrivet direkt 
för dig som äger en 48 K 
Spectrum och den kan endast 
köpas från oss. Spelet är skrivet 
av Claes Kristiansson och är helt 
i maskinkod, förutom 
inledningen. 

Någonstans i oceanen har ett 
flygplan störtat. Flygkaptenen 
överlever och det är du som skall 
föra honom i säkerhet. Tänk bara 
på att spelet inte slutar där du 
tror. Gå inte vilse i labyrinten 
och se framför allt upp för 
Lamorna. 

Pris för Black Gnome 75:- för 
medlem, 95:- för icke medlem. 
Samlingskassetterna kostar 29:- 
/st för medlem och 49:- för icke 
medlem. 

♦••••• ♦••••••••••••••• 

Enklast beställer du dessa kassetter 
genom att fylla i talongen och skicka 
den till: Allt om Hemdatorer, Box 8017, 
104 20 STOCKHOLM, märk kuvertet 
”club”. Medlem i AoH club är den som 


□ Allt om Hemdatorer kassett ”Spectrum" 

□ Allt om Hemdatorer kassett "VIC-20/64’ 

□ "Black Gnome” 


prenumererar på helår. 


Namn: 


Adress: 


Postadress: . 

□ Ar medlem □ Icke medlem 

Porto- och postförskottsavgilt tillkommer. 
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ett spel 


5 REM SOLVlHLLft HV J.$ 

10 P0kE56,23 CLP FORL=7304TQ7431 RERB0 POKELF NEC 255 

Al PWNT-nwTRB09 >"S • B»8076 V=39?36 F0'PL=0TO199 PO: ^2 ?0I.EV+L. 5 HE:T v=8 

30 B=PEEK';643>*256£=B+3e?28 P=B F=j$ : H=E -1=7 ■ E=C 0 =t I=C *v M=H+* -WQ 120 • 

■40 ft=INT' .RHP'. 1 >*5>+l PPINT"«CTHR'iriD TI t 3 ,2>" "RIOHT-t" ~'s >"• 

50 lFft-lTHENB=B*l OC+1 
60 IFfl=2THENB=B+1 E=E*1 
70 IFft»3THENF=F+l 5=0+1 
30 IFR=4THEHH=H+t 1=J+1 
0+0 IFft=5THEMJ=J+l l=K+l 

100 POKEB+10?. 29 POKEB* 131,29' POKEB+153,29 POK EI> ► 173,29 P0KEF+197,29 POKEF +21 9 > 

110 POKEH+241,29 PÖKEH+263,29 POKEJ+295.29 OOKEJ+30729 

>20 POKEB+110,17 POKEC+l10,0 POKEB+l32■13 POKEC+132,0 POKEB+l11,19 POKEC+lll 0 
>2? PWEB+133,20 POKEC + 133,0 P0KEB+H2 21 P0KEC+U2 0 POIEB+134 22 P0KE'~+1'4 0 
>J® POKEB+lj+,1, C0KE£+154,0'Pi;iEr+i76,lS POIEE+176,0 POKED+155,19PQKEE+135 O 

156,21 POKEE+156,ö POKED+178,22 POKEE+173 O 
>55; POKEF+198,17 P3KEO+138.0 POKEF+220.18 POKEG+220,0 POKEF+199,13 POKEG+193 u 
J {® ^<^21. i'0 PQKEG+221»O POKEF+200.11 P0KEG+20Ö*0 POKEF+222#22 PQKEO+222 0 
180 P0I EH+242.1, PCI£1+242,0 POKEH+264,18 POKEI+264• 8 POKEH+243- 19 P0KEI+24' J r 
>50 POKEH+265’20 POKEI+265.0 POKEH+244.21 POkE1+244,0 POKEH+lgi:II POKE^Sl 0 
200 POKEJ+286,17 POKEK+286,0 POkEJ+303.18 POKEX+388.0 POKEJ+207 19 POKEK+20? 0 

111 ^-+ 288 .e:^+f! 0 ,i! S+lfol 

230 PRlHT 'taa*^DiaiWWlMU)MCJ£i£3£]£]£1£1g]£]£]£T" 

240 IFL C1THEHGOSUB360 


*52 P0kEC+1S2 '° POKEB+133,24 POKEC+133,0 P0KEB+134,25 

+60 POKEP+176,23 POKEE+176.0 POKE 0+177.24 POKEE+177,8 POKED+173,25 
270 POKEF+220,23 POKEO+220,0 POKEF+221 24 POKEG+221.0 POKEF+222,25 
230 POKEH+264,23 POkE1+264,0 POKEH+265,24 POKE1+265,0 POKEH+266.25 POKEI+266 n 
300 IP^lTH^340 P ° ,<E,<+308 ' Ö F>OKEJ * 309 '' S4 PO KE! +3 ® 9 ' e P0K EJ+318,25 POKEK+310 9 
310 PRINT ,, «K«»3£3£3£3£3£3£1£3£]£3£3£” 


POKEC+l34 0 
POKEE+173,0 
POKEG+222 O 
POKE1+266 0 
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320 PRIHT"JSrWWWKSsWMWWW!;;E3£3£3£3£3£3£H3£3£J£" 

330 IF£=7697ORD=769?ORF=7697ORH=7697ORJ=769?THENGOSUB540 
340 IFB=?698ORIt=7698QRF=?693ORH=7698ORJ=7698THEN420 
350 GOT040 

360 PR I HT “ 2 C 3 »K1HC C 3 *»*««C C 3 »IIIE [ 3 .SsMIE £ 3 ’ 

370 PRINT"ci«?WfW«a">SPC<4.'"l M ,3PC'.21 V<K”;SPC<21>"«3" ,SPt <21 
380 IHPUf"«B»VlHNflRE''.L FÖRBE*1*01000 1CXT 

3^0 PPINT ,, =irJi'W»*»**»*»*»*LOPP"M< 

400 PRIHT"*M*m«:r .-iPC- 4>“ "3SFCC21>"K " SPC<21>"M “,SPC<21 
410 TI*="088000" RETURH 
420 IFB»7S98THENV=1 
430 IFD=7693THEHY=2 
440 IFF=769STHEHV= 

450 IFH=7698THEHY=4 
460 IFJ=7698THENV=5 
470 IFL=VTHEI 10*0+1 

438 PRINT"r**»l:l VINNARE NR"V, "113 ". "r»»*»EIOMSTRRT TRVCT * T 
490 PRINT"«*m*»»M»»M>!S"0 
500 OETflt IF 114*""THEN50Ö 
510 IFft*="J"THEMV S-G0T028 
520 IFft*="N" THENPR1HT "73" POk£3b869,240 EMC 
530 GOT0300 

540 PRIMT“«N" .SPC<20>“5M“.SPC<21 1 "ST" ,EPC' 21 ■ 

550 FRlNT*4MA»»",&C<2e>*t “.SPC-.21 •'! " CPe<21.-“l 
560 PRINTSPC<£01"T’ -iSP->'21)"l ",SPC<21>"I ",$PC<2I> 

570 V=1 RETURH 

580 DftTR0.0,0,0,0,1,7,27,51.99.7 14,23,36,40,0,6 7 
590 3MTR255 253 : ,0.8,0,8,0,0,28,68,126. 230, 192,19 
0 

608 BfITflSl,99,3,1,0 0,0,0-255 255,131,131,193,102,44,0 128.123,0 0 6 ' 
- o PftTflSl,95,3, 1 , 1 , 1,1,1,255,253,131.1,1-1,1,1,16,56,56,56,56.56-St 
02030,0 

620 BATFI24,0,68,66,126,66,66 0,36,8-60,66. 126,66.66,0.-235 255,255. 235 
5,253 


.ws -spc<2::'"W5" 


SPC<21. ,, ‘M 




1 ;SPC'.2iv: 

•; ",CPC 2l>"i 


I12,14,29,255,255,< 
i -128,i 20 129 192,5 



3,43 


i,e.-o 
■ 6 - -0 0 0 


GRAFIKSVMBOLER : 

3 = CLR/HOME 
3 = SHIFT + CLR/HOME 
M = CRSR HER 

II = SHIFT + CRSR VflHSTER 
II = CRSR HÖGER 
S = CTRL + 9 

■ = CTRL + O 

■ = CTRL + 1 

I = COMMOHORE KNAPPEN + H 
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Tyvärr så hände det något otäckt 
med förra numrets äventyrsartikel 
och när jag läste den ville jag fly till 
yttre Hebriderna eller någon annan 
isolerad ögrupp. 

Förmodligen hade sättarens lille 
son spelat Fia med bokstäverna 
samt svalt några som såg extra 
goda ut. Nåväl, man får ta tjuren vid 
hornen och till alla läsare vill jag 
bara säga, jag menade inte som det 
blev. 

Men ta det förståliga från förra 
numret och jämför med detta så 
skall det nog bli begripligt. 

Jag lovade också i förra numret 
att det skulle bli ett komplett 
äventyrslista i detta nummer och 
här bredvid kan du se ett mycket 
enkelt sådant. Det är skrivet för 
VIC-20 men kan nog med lite 
försiktighet användas på de flesta 
datorer. 

På rad 1500 förekommer ett 
inventerat hjärta, som betyder 
"rensa skärmen”. Byt detta tecken 
mot något annat om du har en 
annan dator. 

Här följer en dissekering. 

Först de viktiga variablerna. V$() 
verb som datorn förstår. 

F$()Föremål datorn känner till. 
R$()Rum i detta äventyr. 
02()Placering av föremål. 

ADet rum man befinner sig i. 

På rad 10-130 frågas efter aktion, 
meningen delas upp i 01$/= verbet 
och 02$=substantivet. Vi kontrollerar 
om datorn förstår verbet och går till 
lämplig subrutin. 

På raderna 1000-1060 initierar och 
uppläggs ordlistan. 

På raderna 1500-1580 ligger 
utskriftsrutinerna. 

Rad 1600 är en fördröjningssats 
som anropas här och där i 
programmet. 

I subrutin 2000 ligger läsrutinen 
och naturligtvis kan man bara läsa 
boken. 

I Subrutin 3000 är det en 
förflyttningsrutin som hindrar dig 
att gå någon annanstans än till 
grannrummen. 

I subrutin 4000 plockar du upp 
saker som du hittar. Med andra ord 
02()sätts till 0. 

I subrutin 5000 lägger du ifrån dig 
saker, som subrutin 4000 fast 
omvänt. 

Detta är avsett att vara ett enkelt 



Av Clas Kristiansson 


atorn 



►äventyrsspel. Det krävs ingen större 
skicklighet för att vinna det. Men 
avsikten är att ge er en knuff att 
börja skriva egna spel. 

Mycket kan läggas till i form av 
hjälp, inventering etc. Dessutom 
brukar de flesta spel bara ange den 
riktning man kan gå åt, som norr, 
syd, ost, väst, upp, och ner. 

När ni nu lyckas att få ihop något 
bra så skicka mig gärna det. Jag 
lovar att publicera de äventyr som 
håller måttet. Tänk på att märka din 
kassett med namn adress samt 
vilken dator du har skrivit 
programmet på och naturligtvis så 
honoreras alla publicerade 
program. 

Skriv nu på SVENSKA äventyr och 
inte engelska (norska går bra). 




I nästa nummer skall jag titta på 
några av de äventyrsspel som finns 
på svenska marknaden. Kanske har 
jag till dess kommit på vad man 
skall göra med död ko och en 
lodig kniv. 
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5 GOSUB 1000 
3 GOSUB 1500 

10 INPUT"VRD GOR VI NU";IN$ 

20 FORI=1TGLEN(IN$) 

30 IFMID$<IN$,I,l)»” "THENGOTO 60 
40 NEXTI 

50 PRINT"2 ORD TRCK" 


51 GOTO10 

60 01$=LEFT$<IN$,I-1> 

70 02$=RIGHT$<IN$,LEN<IN$)-I> 

80 FOR 1=1T04 
30 IF01$=V*<I>THENGOTO120 
100 NEXTI 

110 PRINT"JflG KRN INTE " i IN$ : GOSUB1600 : G0T03 
120 ON I GOSUB2000,3000,4000,5000 
130 G0T03 
333 STOF 

1000 REM**ORDLISTA** 

1010 F0RI=1T04 

1020 REftDViCI>,F$<I>,R$<I),02 Cl> 

1030 NEXTI 

1040 DRTR"LRSBOKEN" HRLLEN",4,"GR","BORDET" 
1045 DRTR"KOKET",2,"Tfl", "STOLEN","RUMMET",1 
1050 DRTR"LRGG","SANGEN" ,"GRRDROBEN",3 
1055 R=1 
1060' RETURN 

1500 PRINT "riDU STRR I "jR$<fi> 

1510 PRINT"DU SER " 

1520 F0RI=1T04 

1530 IF02<I> =RTHENPRINTF$ <I) 

1540 NEXTI 

1550 PRINT"DU KRN GR TILL" 

1560 IFR>1THENPRINTR$ ( fi-1 > 

1570 I FRC4THENPRINTR$< fl+1) 

1580 RETURN 

1600 FORT=1TO500 : NEXTT : RETURN 

2000 IF 02$=" BOKEN"RNB02<I)=0THENGO3UB6000 

2010 IF02$="BOKEN "AND 02(1>=0ANDfl=2THEN GOTO6020 

2020 GOSUB1600^ GOSUB 1600;GOSUB1600 

2339 RETURN 

3000 FOR I=1T04 

3010 IFQ2$=R$<I)THENGOTO3040 

3020 NEXTI 

3030 PRINT"DU KRN INTE GR DIT" : GOSUB1600 : G0T03333 



3040 IF RBS<fl-1)<2THENA=I 
3339 RETURN 
4000 F0RI=1 TO 4 
4010 IFÖ2$=F$<I)THENGOTO4040* 

4020 NEXTI 

4030 PRINTIN$;" LÖJLIGT,DET GRR VRL INTE" : GOSUB1600 : G0T04999 
4040 IF02(I)=R THEN 02(1>=0 
4339 RETURN 
5000 F0RI=1T04 

5010 IF02$=F$(I)THENGOTO5040 
5020 NEXTI 

5030 PRINT"JAG VILL INTE ";IN$ 

5040 IF02(I)=0THENO2(I>=R 
5933 RETURN 

6000 PRINT"BOKEN HRR BLANKA SIDOR" 

6010 RETURN 

6020 PRINT"NU GICK DU OCH VANN SPELET GRATULERAR 
6030 END 











Joakim Pauli har lekt med sin Vic- 
20 ett år nu och har tillverkat flera 
olika program. Mest är det 
nyttoprogram så som olika register 
och sorteringsprogram. 

Joakims dröm är att utbilda sig till 
programmerare. Några år har han 
kvar till dess, då han ännu bara är 15 
år. Här är ett spel han konstruetat 
med insperation av Nitendos Game 
and Watch spel. 

Det gäller för en stackars kock att 
fånga alla de pannkakor som kommer 
farande uppifrån. Man får tre chanser 
och det gäller att vara både snabb 
finurlig för att lyckas. Man styr kocken 
med. och,. 

Uppläggningen och grafiken är 
trevlig och spelet roar verkligen. 

Lycka till! 


Till VIC-20 


Rad 1 rensar 
högupplösningsminnet. 

Rad 2-4 sätter rampekarna 512 
bytes ner, gör randomize och sätter 
skärmfärg Hoppar till utskrifts och 
omdifienieringsrutin 

Rad 5-10 sätter upp variablerna , 
sätter volym, färg, 
höguppläsningsmod. 

Rad 12-26 skriver ut poäng, ritar ut 
kocken och kollar om någon tangent 
är nedtryckt. 

17-21 flyttar pannkakan. 

22-25 flyttar kocken. 

26-28 sätter upp ny pannkaka samt 
flyttar denna. 

29-30 kollar träff. 

31 -38 kollar missarna och slutar vid 
tre missar. 

39-45 instruktioner. 

46-47 ljud. 

48-52 grafiktecknen. 

&VV 53-56 instruktioner. 

Av Joakim Pauli 
Illustration Kjell Lindgren 


1 F0RI=7168T07679 POKEI,0 NEXT 

2 P0KE36879,S P0KE56.28 

3 Q=RND<-TI> GOT039 

4 G03UB43 FORI=0105006 NEXT 

5 0=36376 V=36378 

6 U=40 1=1 E=1 0=33313 0=180 T=7680 P=8098 

7 P0KEV.15 
6 R=ie 

9 PRIN7"m"CHR#':8> P0KE36879,136 POKE781,18 P0KE36S69,255 G0T026 

10 B*U>>"«UMFIB:CmHC3 
n BS121>=" Vi WlllDliEaO Ulla 2 

12 GETR* 

13 PPINT"ä" POKE782.H 3VS65520 PPINTBr E) 

14 PRINT"jÄä"3''S" FORI=0TOW NEXT 

15 IFfi*='',"THEN22 

16 IFfi*= M ."THEK24 

*^j F+22 p OKEF,0 P0KEF-22,32 : IFF>8164THENP0KEF,32'F=7686 I=I+iq M=N+1 GO 1 

18 IFPEEK< F+22 >=6THEN29 

19 IFPEEK CF+22 >=7THEN29 

20 1=1+1 IFI3QTHEN26 

21 GOTO12 

22 fl=A-l IFR<6THENfi=A+l 

23 PRINTTT P0KE782.A 3YS65520 PR1NTBJU , E=1 G0T012 

24 fl=A+l : IFA>16THENfl=R-l 

25 PRINT".T P0KE782,R : SVS65520 : PR1NTBf(2> E=2 GOTO12 

26 F=T+INT<RNDimi0>+6 POKEF.0 

27 Q=Q-1 IFCK1THENS=Q+1 
23 I=ö GOTO 10 

29 P0KEF.32 F=T+INT<RND<mi0>+6 S=S+1 PRINT"S : H=W-1 G0SUB46 IFWOTHENW» 

30 G0T012 

31 IFM32THEN33 

32 G0T026 

33 P0KE36869, 240 PR INT ".TBHDIN PQATH-XMG ELEV “ 

34 PRINT"«S EN GRU. *NG TILL <J.'N> 

35 GE TUI* 

36 IFW*="N”THENEHD 

37 IFWBO" J "THEH35 

33 RUN 5 

39 PR INT" OS INSTRUKTIONER 

40 PRINT”KB DU STYR NED < OCH 3 

'*! 2JKISS DU FFr *'-* F 1 POBH4NG F01UR VARJE PRNNKRKR DU FA71I. J04GRR 

42 PRINT''«W TRYCK EN TANGENT 

43 POKE198,0 

44 GETU* IFU*='"‘THEN44 

45 PRINT"O" G0T053 

46 PClKEO. 240 FOR i =0TO2 NEXT POKEO, 0: RETURN 

47 P0KE36874,130 FORI=0TO5 NEXT P0KE36874.0'■RETURN 

48 FORI=0TO63 READJ P0KE7168+I, J NEXT RETURN 

49 DATA0,0,0,28,58,124,120.32,0,35,254,126,90.126,162.60 

50 DATR24.126,255.255.60.60,60,60,60,60,60,36,36,36.102,0 

51 DRTR0.0,1,1,1,1,1,1.0,6,128,128,128,128.128-128 

52 DfiiR0,0,255,240,0,0.0,0,0,0,255,15,0,0,0,0 

53 F 0KE36879.172:P0KE36869,255 

34 PRINTTiafiWaWWK 4-, aiEitEIGKIINr " 

55 PRINT" au 

56 G0T04 



E47 G 


W+l 
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ADMATE DP-80 


*exkl moms 

VI SÖKER ÅTERFÖRSÄLJARE. KONTAKTA OSS GÄRNA FÖR YTTERLIGARE INFORMATION. 

Visas på NMS-84 

I In Lrll ■! II I 1 Monter 9a 

Box 2084,194 02 Upplands Väsby. Tel 0760-880 40. 
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